fix: typos
This commit is contained in:
parent
b8f41ef0b3
commit
97f62b92c1
@ -28,7 +28,7 @@ setSerializable act = recovering policy [logRetries suggestRetry logRetry] act'
|
||||
-> SqlError
|
||||
-> RetryStatus
|
||||
-> ReaderT SqlBackend m ()
|
||||
logRetry shouldRetry err status = $logDebugS "Sql" . pack $ defaultLogMsg shouldRetry err status
|
||||
logRetry shouldRetry err status = $logDebugS "SQL" . pack $ defaultLogMsg shouldRetry err status
|
||||
|
||||
act' :: RetryStatus -> ReaderT SqlBackend m a
|
||||
act' RetryStatus{..}
|
||||
|
||||
2
start.sh
2
start.sh
@ -6,7 +6,7 @@ set -e
|
||||
|
||||
__HOST=${HOST:-$(hostname -s | awk '{ print $0; }')}
|
||||
|
||||
export DETAILED_LOGGING=${DETAILED_LOGGIN:-true}
|
||||
export DETAILED_LOGGING=${DETAILED_LOGGING:-true}
|
||||
export LOG_ALL=${LOG_ALL:-false}
|
||||
export LOGLEVEL=${LOGLEVEL:-info}
|
||||
export DUMMY_LOGIN=${DUMMY_LOGIN:-true}
|
||||
|
||||
Loading…
Reference in New Issue
Block a user