diff --git a/src-hxbrief/Main.hs b/src-hxbrief/Main.hs index d1d1bb6..5324066 100644 --- a/src-hxbrief/Main.hs +++ b/src-hxbrief/Main.hs @@ -570,7 +570,7 @@ main = B.mainFromCmdParser $ do line <- evalStateT (stateLine False False) finalState s_regions finalState `forM_` \r -> closeConsoleRegion r let lastLine = case ecMay of - Nothing -> fGrey ++ line ++ ", UserInterrupt\n" + Nothing -> fGrey ++ line ++ ", UserInterrupt\n" ++ fReset Just ec -> fGrey ++ line ++ ", ec=" ++ showEC ec ++ "\n" pure (lastLine, ecMay)