diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-10 15:26:21 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-10 15:26:21 (GMT) |
| commit | e6e32f5b516a160dea856d371497b620cd6b8746 (patch) | |
| tree | 01f7adcaadf8875893ea59d7b147f3d465b7886a /unix/tclUnixChan.c | |
| parent | 4ccfe4eda6b1f0c794b7a4a3e241c0e201232501 (diff) | |
| parent | 2ffd22efd1279d41b6a871510d564e8a5151a948 (diff) | |
| download | tcl-e6e32f5b516a160dea856d371497b620cd6b8746.zip tcl-e6e32f5b516a160dea856d371497b620cd6b8746.tar.gz tcl-e6e32f5b516a160dea856d371497b620cd6b8746.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'unix/tclUnixChan.c')
| -rw-r--r-- | unix/tclUnixChan.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c index 2718044..3f972ae 100644 --- a/unix/tclUnixChan.c +++ b/unix/tclUnixChan.c @@ -1768,7 +1768,7 @@ TclpOpenFileChannel( char channelName[16 + TCL_INTEGER_SPACE]; const Tcl_ChannelType *channelTypePtr; - switch (mode & (O_RDONLY | O_WRONLY | O_RDWR)) { + switch (mode & O_ACCMODE) { case O_RDONLY: channelPermissions = TCL_READABLE; break; |