[armedbear-cvs] r11416 - branches/open-external-format/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Thu Dec  4 23:08:19 2008
New Revision: 11416

Log:
Fix partially-reverted change: remove eolseq.


Modified:
   branches/open-external-format/src/org/armedbear/lisp/Stream.java

Modified: branches/open-external-format/src/org/armedbear/lisp/Stream.java
==============================================================================
--- branches/open-external-format/src/org/armedbear/lisp/Stream.java	(original)
+++ branches/open-external-format/src/org/armedbear/lisp/Stream.java	Thu Dec  4 23:08:19 2008
@@ -1874,8 +1874,12 @@
     try
       {
         if (c == '\n') {
-	  writer.write(eolseq);
-            writer.flush();
+	  if (eolStyle == EolStyle.CRLF)
+              writer.write("\r\n");
+          else
+              writer.write(eolChar);
+          
+          writer.flush();
           charPos = 0;
         } else {
           writer.write(c);