init/check Isabelle_System;
authorwenzelm
Fri, 03 Jul 2009 21:14:46 +0200
changeset 31928 2d8e50886558
parent 31927 9a0f28bcc81d
child 31929 ecfc667cac53
child 31939 e1ac7ab73bb1
init/check Isabelle_System;
src/Pure/System/gui_setup.scala
--- a/src/Pure/System/gui_setup.scala	Fri Jul 03 21:14:16 2009 +0200
+++ b/src/Pure/System/gui_setup.scala	Fri Jul 03 21:14:46 2009 +0200
@@ -43,9 +43,6 @@
     }
 
     // values
-    if (Platform.is_windows) {
-      text.append("Cygwin root: " + Cygwin.config()._1 + "\n")
-    }
     Platform.defaults match {
       case None =>
       case Some((name, None)) => text.append("Platform: " + name + "\n")
@@ -53,7 +50,15 @@
         text.append("Main platform: " + name1 + "\n")
         text.append("Alternative platform: " + name2 + "\n")
     }
-    text.append("Isabelle home: " + java.lang.System.getProperty("isabelle.home"))
+    if (Platform.is_windows) {
+      text.append("Cygwin root: " + Cygwin.config()._1 + "\n")
+    }
+    try {
+      val isabelle_system = new Isabelle_System
+      text.append("Isabelle home: " + isabelle_system.getenv("ISABELLE_HOME") + "\n")
+    } catch {
+      case e: RuntimeException => text.append(e.getMessage + "\n")
+    }
 
     // reactions
     listenTo(ok)