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