]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/matitaGui.ml
1. Warnings are now printed in orange (yellow was unvisible on a white
[helm.git] / helm / matita / matitaGui.ml
index de8e361965066595f51ac9bd75cc319197f2ece4..5ea3903835f05dafa4a83dc4c6b2711b84aa3a5d 100644 (file)
@@ -42,7 +42,7 @@ end
 class console ~(buffer: GText.buffer) () =
   object (self)
     val error_tag   = buffer#create_tag [ `FOREGROUND "red" ]
-    val warning_tag = buffer#create_tag [ `FOREGROUND "yellow" ]
+    val warning_tag = buffer#create_tag [ `FOREGROUND "orange" ]
     val message_tag = buffer#create_tag []
     val debug_tag   = buffer#create_tag [ `FOREGROUND "#888888" ]
     method message s = buffer#insert ~iter:buffer#end_iter ~tags:[message_tag] s