Browse Source

Display nothing in white, normal style

 + The purpose is to highlight the difference between the output of OcLaunch and
 the output of commands. This way, what was display in white, normal style, is
 now bold. Almost everything else has color, so nothing is displayed in white,
 normal style anymore.
 + I say almost, because licence and that sort of things continue to be
 displayed with a simple printf.
Leo 9 years ago
parent
commit
21dc49b774
1 changed files with 1 additions and 1 deletions
  1. 1 1
      src/messages.ml

+ 1 - 1
src/messages.ml

@@ -120,7 +120,7 @@ let debug message =
 let info message =
   check_verbosity ~f:(fun () ->
          let mess = message ^ "\n" in
-         print ~color:White ~style:Normal mess
+         print ~color:White ~style:Bold mess
        ) 3
 ;;