fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix: typos

Browse Source
This commit is contained in:
Gregor Kleen 2019-11-21 12:06:59 +01:00
parent b8f41ef0b3
commit 97f62b92c1
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Utils/Sql.hs
View File

@ -28,7 +28,7 @@ setSerializable act = recovering policy [logRetries suggestRetry logRetry] act'
-> SqlError -> SqlError
-> RetryStatus -> RetryStatus
-> ReaderT SqlBackend m () -> 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 -> ReaderT SqlBackend m a
act' RetryStatus{..} act' RetryStatus{..}

2
start.sh
View File

@ -6,7 +6,7 @@ set -e
__HOST=${HOST:-$(hostname -s | awk '{ print $0; }')} __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 LOG_ALL=${LOG_ALL:-false}
export LOGLEVEL=${LOGLEVEL:-info} export LOGLEVEL=${LOGLEVEL:-info}
export DUMMY_LOGIN=${DUMMY_LOGIN:-true} export DUMMY_LOGIN=${DUMMY_LOGIN:-true}