import -ko -b 1.1.3 XEmacs XEmacs-21_2 r21-2-35

[chise/xemacs-chise.git.1] / src / console-stream.c

diff --git a/src/console-stream.c b/src/console-stream.c
index 33daa91..7077b3c 100644 (file)
--- a/src/console-stream.c
+++ b/src/console-stream.c
@@ -69,7 +69,9 @@ stream_init_console (struct console *con, Lisp_Object params)
     {
       CHECK_STRING (tty);
       stream_con->in = stream_con->out = stream_con->err =
-       fopen ((char *) XSTRING_DATA (tty), "r+");
+       /* #### We don't currently do coding-system translation on
+          this descriptor. */
+       fopen ((char *) XSTRING_DATA (tty), READ_PLUS_TEXT);
       if (!stream_con->in)
        error ("Unable to open tty %s", XSTRING_DATA (tty));
     }