ChangesBrowser.st
changeset 6270 80d26b5afda0
parent 6255 b43a5b25e300
child 6288 4767ba5caf5b
--- a/ChangesBrowser.st	Wed Apr 20 18:27:53 2005 +0200
+++ b/ChangesBrowser.st	Wed Apr 20 18:33:23 2005 +0200
@@ -1525,7 +1525,12 @@
     ].
 
     answer == true ifTrue:[
-        ^ cls autoload isLoaded
+        Autoload autoloadFailedSignal handle:[:ex |
+            AbortOperationRequest raise.
+            ^ false
+        ] do:[
+            ^ cls autoload isLoaded
+        ]
     ].
 
     answer isNil ifTrue:[
@@ -5658,5 +5663,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.329 2005-04-18 11:41:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.330 2005-04-20 16:33:23 cg Exp $'
 ! !