Fix build

This commit is contained in:
Gregor Kleen 2019-04-27 10:28:25 +02:00
parent 60d6d2eda5
commit 996d04574f

View File

@ -169,11 +169,11 @@ makeFoundation appSettings'@AppSettings{..} = do
smtpPool <- for appSmtpConf $ \c -> do
$logDebugS "setup" "SMTP-Pool"
createSmtpPool
createSmtpPool c
appWidgetMemcached <- for appWdigetMemcachedConf $ \c -> do
appWidgetMemcached <- for appWidgetMemcachedConf $ \c -> do
$logDebugS "setup" "Widget-Memcached"
createWidgetMemcached
createWidgetMemcached c
-- Create the database connection pool
$logDebugS "setup" "PostgreSQL-Pool"