--- a/BrowserView.st Mon Mar 04 10:49:18 1996 +0100
+++ b/BrowserView.st Mon Mar 04 12:54:22 1996 +0100
@@ -1319,17 +1319,18 @@
self checkClassSelected ifFalse:[^ self].
nm := currentClass name.
Autoload autoloadFailedSignal handle:[:ex |
- self warn:(resources string:'autoload of %1 failed.
+ self warn:(resources string:'autoload of %1 failed.
Check your source directory for a file named %1.st
and/or the abbreviation file for its shortened name.') with:nm.
- ex return.
+ ex return.
] do:[
- currentClass autoload.
- self switchToClassNamed:nm
+ currentClass autoload.
+ currentClass := actualClass := nil.
+ self switchToClassNamed:nm
]
- "Modified: 1.11.1995 / 14:32:38 / cg"
+ "Modified: 4.3.1996 / 12:16:05 / cg"
!
classMenu
@@ -6933,6 +6934,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.108 1996-03-02 18:02:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.109 1996-03-04 11:54:22 cg Exp $'
! !
BrowserView initialize!