Change 10999 by jhi@alpha on 2001/06/28 03:49:07
Subject: [ID 20010625.009] open(FILE,"+foo") [PATCH]
From: Robert Spier <[EMAIL PROTECTED]>
Message-ID: <[EMAIL PROTECTED]>
Date: Wed, 27 Jun 2001 23:13:16 -0400
Affected files ...
... //depot/perl/doio.c#163 edit
Differences ...
==== //depot/perl/doio.c#163 (text) ====
Index: perl/doio.c
--- perl/doio.c.~1~ Wed Jun 27 22:00:05 2001
+++ perl/doio.c Wed Jun 27 22:00:05 2001
@@ -233,6 +233,7 @@
}
IoTYPE(io) = *type;
if ((*type == IoTYPE_RDWR) && /* scary */
+ (*(type+1) == IoTYPE_RDONLY || *(type+1) == IoTYPE_WRONLY) &&
((!num_svs || (tend > type+1 && tend[-1] != IoTYPE_PIPE)))) {
mode[1] = *type++;
writing = 1;
End of Patch.
