class: Tools::NewSystemBrowser
authorClaus Gittinger <cg@exept.de>
Thu, 11 Dec 2014 17:56:25 +0100
changeset 15009 250a63cfb33f
parent 15008 6bb5b292ad5c
child 15010 21fb047d5098
class: Tools::NewSystemBrowser changed: #smalllintCheckMenuForEnvironment: ouch - dont DNU if RBBuiltinRuleSet is unloaded
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Thu Dec 11 16:42:10 2014 +0100
+++ b/Tools__NewSystemBrowser.st	Thu Dec 11 17:56:25 2014 +0100
@@ -52013,8 +52013,8 @@
 
     menu := Menu new.
 
-    self canUseRefactoringSupport ifFalse:[
-        menu addItem:(MenuItem label: (resources string: 'SmallLint not available') itemValue: nil enabled: false).
+    (self canUseRefactoringSupport and:[RBCompositeLintRule notNil]) ifFalse:[
+        menu addItem:(MenuItem label: (resources string: 'SmallLint not loaded/available') itemValue: nil enabled: false).
         ^ menu
     ].
 
@@ -61920,11 +61920,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2145 2014-12-04 11:22:51 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2146 2014-12-11 16:56:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2145 2014-12-04 11:22:51 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2146 2014-12-11 16:56:25 cg Exp $'
 !
 
 version_HG
@@ -61933,7 +61933,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2145 2014-12-04 11:22:51 stefan Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2146 2014-12-11 16:56:25 cg Exp $'
 ! !