exception access
authorClaus Gittinger <cg@exept.de>
Sat, 27 Apr 2013 14:45:52 +0200
changeset 2994 81c2f934a7cd
parent 2993 50284280f5d6
child 2995 ff546a7a872e
exception access
OperationQueue.st
--- a/OperationQueue.st	Fri Apr 26 16:11:17 2013 +0200
+++ b/OperationQueue.st	Sat Apr 27 14:45:52 2013 +0200
@@ -139,11 +139,11 @@
     opInQ := queue next.
 
     theOperation := opInQ operation.
-    Object abortSignal handle:[:ex |
+    AbortOperationRequest handle:[:ex |
         Transcript showCR:'operation aborted'.
         opInQ operationResult:nil.
     ] do:[
-        Object errorSignal handle:[:ex |
+        Error handle:[:ex |
             |ex2|
 
             Transcript showCR:'operation error: ', ex errorString.
@@ -349,6 +349,6 @@
 !OperationQueue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/OperationQueue.st,v 1.8 2013-04-19 09:35:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/OperationQueue.st,v 1.9 2013-04-27 12:45:52 cg Exp $'
 ! !