diff --git a/hledger-lib/Hledger/Utils/Debug.hs b/hledger-lib/Hledger/Utils/Debug.hs index 7d08b6dac..fe9aa0f8e 100644 --- a/hledger-lib/Hledger/Utils/Debug.hs +++ b/hledger-lib/Hledger/Utils/Debug.hs @@ -116,12 +116,14 @@ import System.Console.ANSI (hSupportsANSIColor) import System.IO (stdout) prettyopts = - defaultOutputOptionsDarkBg - -- defaultOutputOptionsLightBg - -- defaultOutputOptionsNoColor + baseopts { outputOptionsIndentAmount=2 , outputOptionsCompact=True } + where + baseopts + | useColor = defaultOutputOptionsDarkBg -- defaultOutputOptionsLightBg + | otherwise = defaultOutputOptionsNoColor -- | Pretty print. Generic alias for pretty-simple's pPrint. pprint :: Show a => a -> IO ()