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