Tools__NewSystemBrowser.st
branchjv
changeset 12128 a7ff7d66ee85
parent 12125 0c49a3b13e43
child 12133 077d0d147d4b
--- a/Tools__NewSystemBrowser.st	Sun Jan 29 18:58:38 2012 +0000
+++ b/Tools__NewSystemBrowser.st	Mon Jan 30 17:49:41 2012 +0000
@@ -51659,8 +51659,14 @@
         assert:(#( #smalllintRulesAll #smalllintRulesFromUser #smalllintRules ) 
                 includes:ruleSetSymbol).
     rule := self perform:ruleSetSymbol asSymbol.
-    rule isNil ifTrue:[ ^ self ].
-    rule isEmpty ifTrue:[
+
+    "JV@2011-01-30: Oops, what the code below was supposed to do?"
+"/    rule isNil ifTrue:[ ^ self ].
+"/    rule isEmpty ifTrue:[
+"/        rule := self smalllintRulesFromUser.
+"/    ].
+    "Changed to"
+    rule isNil ifTrue:[
         rule := self smalllintRulesFromUser.
     ].
 
@@ -51677,8 +51683,8 @@
     "Modified: / 28-12-2008 / 14:40:01 / bazantj <enter your email here>"
     "Created: / 24-02-2009 / 11:02:57 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 22-07-2009 / 14:38:30 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 28-08-2010 / 20:45:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 23-09-2011 / 15:26:48 / cg"
+    "Modified: / 30-01-2012 / 10:37:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 smalllintRules
@@ -55725,7 +55731,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1702 2012/01/26 13:58:43 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st 7854 2012-01-30 17:49:41Z vranyj1 $'
 !
 
 version_CVS
@@ -55733,7 +55739,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st 7851 2012-01-29 15:33:37Z vranyj1 $'
+    ^ '$Id: Tools__NewSystemBrowser.st 7854 2012-01-30 17:49:41Z vranyj1 $'
 ! !
 
 NewSystemBrowser initialize!