SBrowser.st
changeset 742 2ef5e22d8983
parent 675 57cc7dc74d67
child 820 2a412afad51d
--- a/SBrowser.st	Mon Sep 30 22:59:44 1996 +0200
+++ b/SBrowser.st	Mon Sep 30 23:02:04 1996 +0200
@@ -390,7 +390,7 @@
     "launch a browser for all methods which ahve a particular (or any, ifNil)
      resource in aCollectionOfClasses"
 
-    |sel browser searchBlock|
+    |browser searchBlock|
 
     searchBlock := [:class :method :s |
                         |src parser rsrc|
@@ -839,7 +839,7 @@
 browseSuperCallsIn:aCollectionOfClasses title:title
     "launch a browser for all super sends in aCollectionOfClasses"
 
-    |sel browser searchBlock|
+    |browser searchBlock|
 
     searchBlock := [:class :method :s | 
         |src parser|
@@ -1433,6 +1433,6 @@
 !SystemBrowser  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/SBrowser.st,v 1.67 1996-07-15 10:01:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/SBrowser.st,v 1.68 1996-09-30 21:02:04 cg Exp $'
 ! !
 SystemBrowser initialize!