exception access
authorClaus Gittinger <cg@exept.de>
Sat, 27 Apr 2013 14:27:47 +0200
changeset 12724 941f46a7d28d
parent 12723 4b3cc722d617
child 12725 93efe8fda21c
exception access
AbstractFileFinderApplicationComponent.st
--- a/AbstractFileFinderApplicationComponent.st	Fri Apr 26 11:48:53 2013 +0200
+++ b/AbstractFileFinderApplicationComponent.st	Sat Apr 27 14:27:47 2013 +0200
@@ -185,7 +185,7 @@
     (task := searchTask) notNil ifTrue:[
         searchTask := nil.
 
-        Object errorSignal handle:[:ex|
+        Error handle:[:ex|
             Dialog warn:ex description.
         ]do:[
             task isDead ifFalse:[
@@ -478,10 +478,10 @@
 !AbstractFileFinderApplicationComponent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.9 2013-03-28 16:48:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.10 2013-04-27 12:27:47 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.9 2013-03-28 16:48:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.10 2013-04-27 12:27:47 cg Exp $'
 ! !