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}