--- a/ReadEvalPrintLoop.st Wed Apr 04 17:39:13 2007 +0200
+++ b/ReadEvalPrintLoop.st Wed Apr 04 18:32:57 2007 +0200
@@ -288,7 +288,7 @@
].
chunk notEmptyOrNil ifTrue:[
- (AbortOperationRequest,AbortAllOperationRequest) handle:[:ex |
+ AbortAllOperationRequest handle:[:ex |
error nextPutLine:('Evaluation aborted: ', ex description)
] do:[
(Error, ControlInterrupt) handle:[:ex |
@@ -324,5 +324,5 @@
!ReadEvalPrintLoop class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.21 2007-03-15 21:38:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.22 2007-04-04 16:32:57 stefan Exp $'
! !