diff --git a/hledger-web/Hledger/Web/Main.hs b/hledger-web/Hledger/Web/Main.hs index 6aac7e1d1..bd9588e2a 100644 --- a/hledger-web/Hledger/Web/Main.hs +++ b/hledger-web/Hledger/Web/Main.hs @@ -55,8 +55,7 @@ hledgerWebMain = withGhcDebug' $ do #if MIN_VERSION_base(4,20,0) -- Control ghc 9.10+'s stack traces. - -- hledger-web isn't showing many yet; leave this enabled for now. - setBacktraceMechanismState HasCallStackBacktrace True + setBacktraceMechanismState HasCallStackBacktrace False #endif -- try to encourage user's $PAGER to properly display ANSI (in command line help) diff --git a/hledger/Hledger/Cli.hs b/hledger/Hledger/Cli.hs index dc1b3a9b5..9654ad5ab 100644 --- a/hledger/Hledger/Cli.hs +++ b/hledger/Hledger/Cli.hs @@ -196,8 +196,7 @@ main = withGhcDebug' $ do #if MIN_VERSION_base(4,20,0) -- Control ghc 9.10+'s stack traces. - -- hledger isn't showing many yet; leave this enabled for now - setBacktraceMechanismState HasCallStackBacktrace True + setBacktraceMechanismState HasCallStackBacktrace False -- CostCentreBacktrace - collect cost-centre stack backtraces (only available when built with profiling) -- HasCallStackBacktrace - collect HasCallStack backtraces -- ExecutionBacktrace - collect backtraces from native execution stack unwinding