diff --git a/src-hxbrief/Main.hs b/src-hxbrief/Main.hs index 9cbbc28..8b5ac36 100644 --- a/src-hxbrief/Main.hs +++ b/src-hxbrief/Main.hs @@ -281,9 +281,9 @@ processLine newPair@(kind, _) = execStateT $ do ) : prettyLines Just ((StdErr, line), Nothing) -> - (fRedDis ++ "│ " ++ ellipse line) : prettyLines + (fRedDis ++ "│ " ++ fReset ++ ellipse line) : prettyLines Just ((StdErr, line), Just (1, _, _)) -> - (fRedDis ++ "│ " ++ ellipse line) : prettyLines + (fRedDis ++ "│ " ++ fReset ++ ellipse line) : prettyLines Just ((StdErr, _), Just (i, pat, _)) -> ( fRedDis ++ "│ "