From 97f62b92c1cc8a68682f6df3b104bd20e0e035b7 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Thu, 21 Nov 2019 12:06:59 +0100 Subject: [PATCH] fix: typos --- src/Utils/Sql.hs | 2 +- start.sh | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Utils/Sql.hs b/src/Utils/Sql.hs index 9726b5222..97805b159 100644 --- a/src/Utils/Sql.hs +++ b/src/Utils/Sql.hs @@ -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{..} diff --git a/start.sh b/start.sh index 40da9eb05..49f9e79f3 100755 --- a/start.sh +++ b/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}