From 5d771e49bb2f74e8adc72e147baade6e42330939 Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Fri, 21 Nov 2014 08:22:17 +0200 Subject: [PATCH] Minor indentation cleanup --- yesod/Yesod/Default/Config2.hs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/yesod/Yesod/Default/Config2.hs b/yesod/Yesod/Default/Config2.hs index 6c51a562..7dca0a34 100644 --- a/yesod/Yesod/Default/Config2.hs +++ b/yesod/Yesod/Default/Config2.hs @@ -129,11 +129,11 @@ loadAppSettings runTimeFiles compileValues envUsage = do Just ne -> return $ getMergedValue $ sconcat ne value <- case envUsage of - IgnoreEnv -> return $ applyEnv False mempty value' - UseEnv -> applyCurrentEnv False value' - RequireEnv -> applyCurrentEnv True value' - UseCustomEnv env -> return $ applyEnv False env value' - RequireCustomEnv env -> return $ applyEnv True env value' + IgnoreEnv -> return $ applyEnv False mempty value' + UseEnv -> applyCurrentEnv False value' + RequireEnv -> applyCurrentEnv True value' + UseCustomEnv env -> return $ applyEnv False env value' + RequireCustomEnv env -> return $ applyEnv True env value' case fromJSON value of Error s -> error $ "Could not convert to AppSettings: " ++ s