diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-03 14:46:31 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-03 14:46:31 (GMT) |
| commit | eacedab36179d8cd74e4c302cd1614dea9d38c34 (patch) | |
| tree | 54e7e28bbe32fa8d3fa05f5a45ef3e5e19f649e7 /tests/io.test | |
| parent | deee822980b9b65d7acf1bd6d972c61dc525ecf7 (diff) | |
| parent | c30f3e95690c1fa32296fb55213cb7f03ac14345 (diff) | |
| download | tcl-eacedab36179d8cd74e4c302cd1614dea9d38c34.zip tcl-eacedab36179d8cd74e4c302cd1614dea9d38c34.tar.gz tcl-eacedab36179d8cd74e4c302cd1614dea9d38c34.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'tests/io.test')
| -rw-r--r-- | tests/io.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/io.test b/tests/io.test index 4db1d33..e0c682c 100644 --- a/tests/io.test +++ b/tests/io.test @@ -5655,8 +5655,8 @@ test io-40.3 {POSIX open access modes: CREAT} {unix umask} { set f [open $path(test3) {WRONLY CREAT}] close $f file stat $path(test3) stats - format "%#o" [expr $stats(mode)&0o777] -} [format %#5o [expr {0o666 & ~ $umaskValue}]] + format 0o%03o [expr $stats(mode)&0o777] +} [format 0o%03o [expr {0o666 & ~ $umaskValue}]] test io-40.4 {POSIX open access modes: CREAT} { file delete $path(test3) set f [open $path(test3) w] |