BrowserView.st
changeset 424 21ff3841f5a5
parent 422 23db16b448fd
child 431 830e2211ec00
--- 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!