From d07edfdbebddf606feb3e602880ac47149adf888 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 18 Nov 2014 15:34:58 -0400 Subject: temporarily always debug --- src/Propellor/CmdLine.hs | 5 ++--- 1 file 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. -- cgit v1.3-2-g0d8e