class: Tools::NewSystemBrowser
authorClaus Gittinger <cg@exept.de>
Thu, 17 Apr 2014 00:57:26 +0200
changeset 14275 d2e5fa9e6519
parent 14274 63c4f959ee7a
child 14276 4b778541d51a
class: Tools::NewSystemBrowser changed: #askForClassToSearch:single:msgTail:resources:filter:forBrowser:thenDo:
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Thu Apr 17 00:12:57 2014 +0200
+++ b/Tools__NewSystemBrowser.st	Thu Apr 17 00:57:26 2014 +0200
@@ -18108,7 +18108,7 @@
 
     box panelView
         addSubView:(showingWhatLabel := (Label label:(resources string:'Recently visited:')) adjust:#left) before:nil.
-    JavaVM isLoaded ifTrue:[
+    (JavaVM notNil and:[JavaVM isLoaded]) ifTrue:[
         box panelView
             addSubView:(check := CheckBox label:(resources string:'Only show Java Classes') model:onlyShowJavaClassesHolder) before:nil.
     ].
@@ -61466,11 +61466,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2054 2014-04-16 22:12:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2055 2014-04-16 22:57:26 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2054 2014-04-16 22:12:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2055 2014-04-16 22:57:26 cg Exp $'
 !
 
 version_HG
@@ -61479,7 +61479,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2054 2014-04-16 22:12:11 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2055 2014-04-16 22:57:26 cg Exp $'
 ! !