summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJoey Hess2014-11-18 15:34:58 -0400
committerJoey Hess2014-11-18 15:34:58 -0400
commitd07edfdbebddf606feb3e602880ac47149adf888 (patch)
treee05fbc1826da32d2b23cfa0d57fd9f4c88702ce9 /src
parent6116f0af248aa5179165606415bde52835b12f23 (diff)
temporarily always debug
Diffstat (limited to 'src')
-rw-r--r--src/Propellor/CmdLine.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Propellor/CmdLine.hs b/src/Propellor/CmdLine.hs
index 62fd68f6..22e0c3f5 100644
--- a/src/Propellor/CmdLine.hs
+++ b/src/Propellor/CmdLine.hs
@@ -349,14 +349,13 @@ getRepoUrl = getM get urls
checkDebugMode :: IO ()
checkDebugMode = go =<< getEnv "PROPELLOR_DEBUG"
where
- go (Just s)
- | s == "1" = do
+ go _ = do
f <- setFormatter
<$> streamHandler stderr DEBUG
<*> pure (simpleLogFormatter "[$time] $msg")
updateGlobalLogger rootLoggerName $
setLevel DEBUG . setHandlers [f]
- go _ = noop
+ -- go _ = noop
-- Parameters can be passed to both ssh and scp, to enable a ssh connection
-- caching socket.