--- a/ExternalStream.st	Fri Feb 20 23:45:22 2015 +0100
+++ b/ExternalStream.st	Fri Feb 20 23:46:45 2015 +0100
@@ -1532,53 +1532,39 @@
 
 initialize
     OpenErrorSignal isNil ifTrue:[
-"/        OpenErrorSignal := OpenError.
-"/        OpenErrorSignal nameClass:self message:#openErrorSignal.
-	OpenErrorSignal := OpenError.
-	OpenErrorSignal notifierString:'open error'.
-
-"/        InvalidReadSignal := ReadErrorSignal newSignalMayProceed:false.
-"/        InvalidReadSignal nameClass:self message:#invalidReadSignal.
-	InvalidReadSignal := InvalidReadError.
-	InvalidReadSignal notifierString:'stream does not support reading'.
-
-"/        InvalidWriteSignal := WriteErrorSignal newSignalMayProceed:false.
-"/        InvalidWriteSignal nameClass:self message:#invalidWriteSignal.
-	InvalidWriteSignal := InvalidWriteError.
-	InvalidWriteSignal notifierString:'stream does not support writing'.
-
-"/        InvalidModeSignal :=  StreamErrorSignal newSignalMayProceed:false.
-"/        InvalidModeSignal nameClass:self message:#invalidModeSignal.
-	InvalidModeSignal := InvalidModeError.
-	InvalidModeSignal notifierString:'binary/text mode mismatch'.
-
-"/        InvalidOperationSignal :=  StreamErrorSignal newSignalMayProceed:false.
-"/        InvalidOperationSignal nameClass:self message:#invalidOperationSignal.
-	InvalidOperationSignal := InvalidOperationError.
-	InvalidOperationSignal notifierString:'unsupported file operation'.
-
-"/        StreamNotOpenSignal := StreamErrorSignal newSignalMayProceed:false.
-"/        StreamNotOpenSignal nameClass:self message:#streamNotOpenSignal.
-	StreamNotOpenSignal := StreamNotOpenError.
-	StreamNotOpenSignal notifierString:'stream is not open'.
-
-"/        StreamIOErrorSignal := StreamErrorSignal newSignalMayProceed:false.
-"/        StreamIOErrorSignal nameClass:self message:#streamIOErrorSignal.
-	StreamIOErrorSignal := StreamIOError.
-	StreamIOErrorSignal notifierString:'I/O error'.
+        OpenErrorSignal := OpenError.
+        OpenErrorSignal notifierString:'open error'.
+
+        InvalidReadSignal := InvalidReadError.
+        InvalidReadSignal notifierString:'stream does not support reading'.
+
+        InvalidWriteSignal := InvalidWriteError.
+        InvalidWriteSignal notifierString:'stream does not support writing'.
+
+        InvalidModeSignal := InvalidModeError.
+        InvalidModeSignal notifierString:'binary/text mode mismatch'.
+
+        InvalidOperationSignal := InvalidOperationError.
+        InvalidOperationSignal notifierString:'unsupported file operation'.
+
+        StreamNotOpenSignal := StreamNotOpenError.
+        StreamNotOpenSignal notifierString:'stream is not open'.
+
+        StreamIOErrorSignal := StreamIOError.
+        StreamIOErrorSignal notifierString:'I/O error'.
     ].
 
     Lobby isNil ifTrue:[
-	Lobby := Registry new.
-
-	"want to get informed when returning from snapshot"
-	ObjectMemory addDependent:self
+        Lobby := Registry new.
+
+        "want to get informed when returning from snapshot"
+        ObjectMemory addDependent:self
     ].
     DefaultEOLMode isNil ifTrue:[
-	self initDefaultEOLMode.
+        self initDefaultEOLMode.
     ].
     ReadMode isNil ifTrue:[
-	self initModeStrings.
+        self initModeStrings.
     ].
     "Modified: / 21.5.1998 / 16:33:53 / cg"
 !
@@ -6435,11 +6421,11 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.409 2015-02-16 19:17:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.410 2015-02-20 22:46:45 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.409 2015-02-16 19:17:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.410 2015-02-20 22:46:45 cg Exp $'
 ! !