--- a/ExternalStream.st	Tue Jul 15 11:37:09 2014 +0200
+++ b/ExternalStream.st	Tue Jul 15 11:37:25 2014 +0200
@@ -2024,6 +2024,18 @@
     ^ String
 !
 
+eolMode
+    "return how end-of-line (EOL) is to be marked.
+     Returns one one of:
+        #crlf         -> add a CR-NL, as in MSDOS
+        #cr           -> add a CR, as in VMS
+        #nl           -> add a NL, as in Unix
+        nil           -> transparent
+    "
+
+    ^ eolMode 
+!
+
 eolMode:aSymbolOrNil
     "specify how end-of-line (EOL) is to be marked.
      The argument may be one of:
@@ -6091,11 +6103,11 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.393 2014-06-07 15:09:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.394 2014-07-15 09:37:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.393 2014-06-07 15:09:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.394 2014-07-15 09:37:25 cg Exp $'
 ! !