--- a/ReadEvalPrintLoop.st Thu Dec 07 19:35:07 2006 +0100
+++ b/ReadEvalPrintLoop.st Thu Dec 07 19:37:36 2006 +0100
@@ -276,7 +276,7 @@
chunk notEmptyOrNil ifTrue:[
(AbortOperationRequest,AbortAllOperationRequest) handle:[:ex |
error nextPutLine:('Evaluation aborted: ', ex description)
- ] do:[
+ ] do:[
(Error, ControlInterrupt) handle:[:ex |
prompt isNil ifTrue:[
ex reject
@@ -303,11 +303,11 @@
"
"Created: / 07-12-2006 / 17:27:21 / cg"
- "Modified: / 07-12-2006 / 19:35:42 / cg"
+ "Modified: / 07-12-2006 / 19:38:11 / cg"
! !
!ReadEvalPrintLoop class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.14 2006-12-07 18:35:07 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.15 2006-12-07 18:37:36 cg Exp $'
! !