diff --git a/yesod/Yesod/Default/Config2.hs b/yesod/Yesod/Default/Config2.hs index 3feb3c9b..dfe40757 100644 --- a/yesod/Yesod/Default/Config2.hs +++ b/yesod/Yesod/Default/Config2.hs @@ -12,7 +12,12 @@ module Yesod.Default.Config2 , getDevSettings , develMainHelper , makeYesodLogger - , EnvUsage (..) + , EnvUsage + , ignoreEnv + , useEnv + , requireEnv + , useCustomEnv + , requireCustomEnv ) where import Data.Monoid @@ -87,6 +92,15 @@ data EnvUsage = IgnoreEnv | UseCustomEnv (H.HashMap Text Text) | RequireCustomEnv (H.HashMap Text Text) +ignoreEnv, useEnv, requireEnv :: EnvUsage +ignoreEnv = IgnoreEnv +useEnv = UseEnv +requireEnv = RequireEnv + +useCustomEnv, requireCustomEnv :: H.HashMap Text Text -> EnvUsage +useCustomEnv = UseCustomEnv +requireCustomEnv = RequireCustomEnv + -- | Load the settings from the following three sources: -- -- * Run time config files