open-file: fix broken "+" mode string.

The "+" mode string should be equivalent to "r+", according to
the manual, but before this change it was equivalent to "r".

* stream.c (do_parse_mode): Unconditionally set m.write to 1
when "+" is present in the mode string.

1 files changed, 1 insertions, 2 deletions

diff --git a/stream.c b/stream.c
index 4fdd767e..f2ff72e2 100644
--- a/stream.c
+++ b/stream.c
@@ -1471,9 +1471,8 @@ static struct stdio_mode do_parse_mode(val mode_str, struct stdio_mode m_dfl,
 
   if (*ms == '+') {
     ms++;
-    if (m.read)
-      m.write = 1;
     m.read = 1;
+    m.write = 1;
   }
 
   if (!m.read && !m.write)