diff -r 17766f9496c8 -r 47c12063b000 SystemBrowser.st --- a/SystemBrowser.st Wed May 18 19:52:39 2005 +0200 +++ b/SystemBrowser.st Wed May 18 20:05:55 2005 +0200 @@ -4317,7 +4317,7 @@ searchBlockForCode:aCodeString isMethod:isMethod "return a block to search for a pice of code (intelligent search)." - |rule rslt errAction searchTree searcher variables messages searchBlock foundMatch| + |errAction searchTree searcher variables messages searchBlock foundMatch| "/self halt. "/rule := ParseTreeLintRule @@ -4369,7 +4369,7 @@ searcher matchesTree:searchTree do:[:aNode :answer | foundMatch := true]. - ].. + ]. messages size > 0 ifTrue:[ "/ can speedup the search, by filtering for sent messages first... @@ -5400,7 +5400,7 @@ !SystemBrowser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.216 2005-02-14 16:13:29 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.217 2005-05-18 18:05:55 stefan Exp $' ! ! SystemBrowser initialize!