sup39/vervis
1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2024-12-28 23:14:51 +09:00
Code Issues Activity

Loading settings was using deprecated functions, switch to new ones

Browse source
This commit is contained in:
fr33domlover 2019-05-24 15:45:36 +00:00
parent 23e760e373
commit bd99729656
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Vervis/Application.hs
View file

@ -232,7 +232,7 @@ getApplicationDev = do
return (wsettings, app) return (wsettings, app)
getAppSettings :: IO AppSettings getAppSettings :: IO AppSettings
getAppSettings = loadAppSettings [configSettingsYml] [] useEnv getAppSettings = loadYamlSettings [configSettingsYml] [] useEnv
-- | main function for use by yesod devel -- | main function for use by yesod devel
develMain :: IO () develMain :: IO ()
@ -271,7 +271,7 @@ mailer foundation =
appMain :: IO () appMain :: IO ()
appMain = do appMain = do
-- Get the settings from all relevant sources -- Get the settings from all relevant sources
settings <- loadAppSettingsArgs settings <- loadYamlSettingsArgs
-- Fall back to compile-time values, set to [] to require values at -- Fall back to compile-time values, set to [] to require values at
-- runtime -- runtime
[configSettingsYmlValue] [configSettingsYmlValue]