diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-18 13:54:06 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-18 13:54:06 (GMT) |
| commit | 176431f58481aeaba56e3463648fd85990236de4 (patch) | |
| tree | acd54df49d264cc7ceef526685b300026bcf7ed7 /unix | |
| parent | ae243c85b7e7b470ea541cce41e76cd2cd7474f6 (diff) | |
| parent | af7fa225c1d0ec592c7af29ead5922f45c1c15fb (diff) | |
| download | tcl-176431f58481aeaba56e3463648fd85990236de4.zip tcl-176431f58481aeaba56e3463648fd85990236de4.tar.gz tcl-176431f58481aeaba56e3463648fd85990236de4.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'unix')
| -rw-r--r-- | unix/tclUnixFCmd.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c index 2ea98a0..b188f21 100644 --- a/unix/tclUnixFCmd.c +++ b/unix/tclUnixFCmd.c @@ -1833,7 +1833,7 @@ GetModeFromPermString( /* who */ switch (*(modeStringPtr+n+i)) { case 'u': - who |= 0x9c0; + who |= 0x9C0; continue; case 'g': who |= 0x438; @@ -1842,13 +1842,13 @@ GetModeFromPermString( who |= 0x207; continue; case 'a': - who |= 0xfff; + who |= 0xFFF; continue; } } who_found = 1; if (who == 0) { - who = 0xfff; + who = 0xFFF; } if (!op_found) { /* op */ @@ -1881,7 +1881,7 @@ GetModeFromPermString( what |= 0x49; continue; case 's': - what |= 0xc00; + what |= 0xC00; continue; case 't': what |= 0x200; |