aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/wg_MessageView.ml
diff options
context:
space:
mode:
authorGravatar ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-03-19 19:54:28 +0000
committerGravatar ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-03-19 19:54:28 +0000
commiteaab1616e5ed52bd209fed83ecafb91bcaf783c9 (patch)
tree4f97e68eae63ab164f9bd0e596a0d344ca37ddcf /ide/wg_MessageView.ml
parent508e8afd8538dd38afa4eaa0dd9c7e349e50e20d (diff)
Adding color for warnings in CoqIDE
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16321 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/wg_MessageView.ml')
-rw-r--r--ide/wg_MessageView.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/ide/wg_MessageView.ml b/ide/wg_MessageView.ml
index ad3b8ecc0..b57f55ea9 100644
--- a/ide/wg_MessageView.ml
+++ b/ide/wg_MessageView.ml
@@ -35,6 +35,7 @@ let message_view () : message_view =
method push level msg =
let tags = match level with
| Interface.Error -> [Tags.Message.error]
+ | Interface.Warning -> [Tags.Message.warning]
| _ -> []
in
buffer#insert ~tags msg;