diff options
| author | ppedrot | 2012-06-28 12:48:44 +0000 |
|---|---|---|
| committer | ppedrot | 2012-06-28 12:48:44 +0000 |
| commit | 693b22e92804aee56efd432e7c66b1a787c15881 (patch) | |
| tree | 6a68336f2ba1effea044eb5ffb1bc32ce26817f2 /lib | |
| parent | a1477696b5f7296ed7b5552dcf1ab15dee90475d (diff) | |
Fixing info_auto / info_trivial display.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15497 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/pp.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/pp.ml4 b/lib/pp.ml4 index 4eaf962636..d05abbcd02 100644 --- a/lib/pp.ml4 +++ b/lib/pp.ml4 @@ -346,7 +346,7 @@ let print_color s x = let make_body color info s = emacs_quote (print_color color (print_color "1" (hov 0 (info ++ spc () ++ s)))) -let debugbody strm = print_color "36" (str "Debug:" ++ spc () ++ strm) (* cyan *) +let debugbody strm = print_color "36" (hov 0 (str "Debug:" ++ spc () ++ strm)) (* cyan *) let warnbody strm = make_body "93" (str "Warning:") strm (* bright yellow *) let errorbody strm = make_body "31" (str "Error:") strm (* bright red *) |