From e31200e2e769155f108075bc5297bdfbb6557106 Mon Sep 17 00:00:00 2001 From: nek0 Date: Sat, 27 Aug 2016 13:41:02 +0200 Subject: [PATCH] no deprecation --- Application.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Application.hs b/Application.hs index fc43a51..9579b56 100755 --- a/Application.hs +++ b/Application.hs @@ -146,7 +146,7 @@ warpSettings foundation = -- | For yesod devel, return the Warp settings and WAI Application. getApplicationDev :: IO (Settings, Application) getApplicationDev = do - settings <- loadAppSettings [configSettingsYml] [] useEnv + settings <- loadYamlSettings [configSettingsYml] [] useEnv foundation <- makeFoundation settings app <- makeApplication foundation wsettings <- getDevSettings $ warpSettings foundation @@ -160,7 +160,7 @@ develMain = develMainHelper getApplicationDev appMain :: IO () appMain = do -- Get the settings from all relevant sources - settings <- loadAppSettingsArgs + settings <- loadYamlSettingsArgs -- fall back to compile-time values, set to [] to require values at runtime [configSettingsYmlValue]