[armedbear-cvs] r12397 - trunk/abcl/src/org/armedbear/lisp

[Ville Voutilainen]

Author: vvoutilainen
Date: Sun Jan 24 16:41:26 2010
New Revision: 12397

Log:
Fix MAKE-BROADCAST-STREAM.8.


Modified:
   trunk/abcl/src/org/armedbear/lisp/Stream.java

Modified: trunk/abcl/src/org/armedbear/lisp/Stream.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Stream.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Stream.java	Sun Jan 24 16:41:26 2010
@@ -107,7 +107,7 @@
 
     protected EolStyle eolStyle = platformEolStyle;
     protected char eolChar = (eolStyle == EolStyle.CR) ? '\r' : '\n';
-    protected LispObject externalFormat = NIL;
+    protected LispObject externalFormat = keywordDefault;
     protected String encoding = null;
     protected char lastChar = 0;