--- a/BrowserView.st Thu Jul 24 14:48:53 1997 +0200
+++ b/BrowserView.st Thu Jul 24 16:11:14 1997 +0200
@@ -4981,7 +4981,7 @@
actualClass := acceptClass := cls.
currentClass isNil ifTrue:[
- self warn:'oops class is gone'
+ self warn:'oops method is gone'
] ifFalse:[
currentClassCategory := currentClass category.
currentSelector := selectorString asSymbol.
@@ -4999,7 +4999,7 @@
"Modified: 31.8.1995 / 11:56:02 / claus"
"Modified: 17.6.1996 / 16:51:28 / stefan"
- "Modified: 7.3.1997 / 21:04:40 / cg"
+ "Modified: 24.7.1997 / 15:02:17 / cg"
!
classNameFromClassMethodString:aString
@@ -10247,6 +10247,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.315 1997-07-04 08:05:56 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.316 1997-07-24 14:11:14 cg Exp $'
! !
BrowserView initialize!