--- a/PositionableStream.st Thu Aug 28 15:11:07 2003 +0200
+++ b/PositionableStream.st Thu Aug 28 17:50:52 2003 +0200
@@ -335,23 +335,23 @@
|labels values|
Smalltalk isInitialized ifFalse:[
- 'PositionableStream [warning]: fileIn error during startup: ' errorPrint. message errorPrintCR.
- ^ #debug
+ 'PositionableStream [warning]: fileIn error during startup: ' errorPrint. message errorPrintCR.
+ ^ #debug
].
"/
"/ are we in the startup sequence of an image restart ?
"/
Processor activeProcessIsSystemProcess ifTrue:[
- 'PositionableStream [warning]: fileIn error during startup: ' errorPrint. message errorPrintCR.
- ^ #continue
+ 'PositionableStream [warning]: fileIn error during startup: ' errorPrint. message errorPrintCR.
+ ^ #continue
].
canContinueForAll ifTrue:[
- labels := #('Cancel' 'Skip' 'Debug' 'Dont ask again' 'Continue').
- values := #(#abort #skip #debug #continueForAll #continue).
+ labels := #('Cancel' 'Skip' 'Debug' 'Dont ask again' 'Continue').
+ values := #(#abort #skip #debug #continueForAll #continue).
] ifFalse:[
- labels := #('Cancel' 'Skip' 'Debug' 'Continue').
- values := #(#abort #skip #debug #continue).
+ labels := #('Cancel' 'Skip' 'Debug' 'Continue').
+ values := #(#abort #skip #debug #continue).
].
AbortAllSignal isHandled ifTrue:[
labels := #('Cancel All') , labels.
@@ -359,13 +359,13 @@
].
^ OptionBox
- request:message
- label:'Error in fileIn'
- form:(WarningBox iconBitmap)
- buttonLabels:labels
- values:values
- default:#continue
- onCancel:#abort.
+ request:message
+ label:'Error in fileIn'
+ form:(WarningBox iconBitmap)
+ buttonLabels:labels
+ values:values
+ default:#continue
+ onCancel:#abort.
"Modified: 10.1.1997 / 18:00:56 / cg"
!
@@ -1211,7 +1211,7 @@
!PositionableStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.132 2003-08-23 12:09:21 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.133 2003-08-28 15:50:52 cg Exp $'
! !
PositionableStream initialize!