Isabelle_Markup.overview_color: indicate error / warning messages;
authorwenzelm
Fri, 17 Sep 2010 21:50:44 +0200
changeset 39512 31290f54be19
parent 39511 5f318522e6fe
child 39513 fce2202892c4
Isabelle_Markup.overview_color: indicate error / warning messages;
src/Tools/jEdit/src/jedit/isabelle_markup.scala
--- a/src/Tools/jEdit/src/jedit/isabelle_markup.scala	Fri Sep 17 21:49:34 2010 +0200
+++ b/src/Tools/jEdit/src/jedit/isabelle_markup.scala	Fri Sep 17 21:50:44 2010 +0200
@@ -54,10 +54,13 @@
     if (snapshot.is_outdated) None
     else
       Isar_Document.command_status(state.status) match {
-        case Isar_Document.Forked(i) if i > 0 => Some(unfinished_color)
+        case Isar_Document.Forked(i) => if (i > 0) Some(unfinished_color) else None
         case Isar_Document.Unprocessed => Some(unfinished_color)
         case Isar_Document.Failed => Some(error_color)
-        case _ => None
+        case Isar_Document.Finished =>
+          if (state.results.exists(r => Isar_Document.is_error(r._2))) Some(error_color)
+          else if (state.results.exists(r => Isar_Document.is_warning(r._2))) Some(warning_color)
+          else None
       }
   }