--- 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!