Fixed template to take proper sitearg configuration

This commit is contained in:
Ian Duncan 2011-07-24 21:38:52 -05:00
parent 52ed616dd5
commit da1dcc1206

View File

@ -47,7 +47,7 @@ with~sitearg~ conf f = do
with~sitearg~LoadConfig :: Settings.AppEnvironment -> (Application -> IO a) -> IO a
with~sitearg~LoadConfig env f = do
conf <- Settings.loadConfig env
withFoobar conf f
with~sitearg~ conf f
-- for yesod devel
withDevelApp :: Dynamic