diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-03 14:39:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-03 14:39:19 (GMT) |
| commit | c30f3e95690c1fa32296fb55213cb7f03ac14345 (patch) | |
| tree | c0408e038d57d98337a74e64296d142d190b8dd9 /tests/fileName.test | |
| parent | f23698ae342e74bcedb17f24cde0f80106e14ea7 (diff) | |
| parent | c99f35416608c70d8e277b38405429a50b64bd84 (diff) | |
| download | tcl-c30f3e95690c1fa32296fb55213cb7f03ac14345.zip tcl-c30f3e95690c1fa32296fb55213cb7f03ac14345.tar.gz tcl-c30f3e95690c1fa32296fb55213cb7f03ac14345.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'tests/fileName.test')
| -rw-r--r-- | tests/fileName.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index 14d7a3b..0f34f2b 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -1329,7 +1329,7 @@ unset globname # AFS, "000" protection doesn't prevent access by owner, so the following test # is not portable. -catch {file attributes globTest/a1 -permissions 0000} +catch {file attributes globTest/a1 -permissions 0} test filename-15.1 {unix specific globbing} {unix nonPortable} { string tolower [list [catch {glob globTest/a1/*} msg] $msg $errorCode] } {1 {couldn't read directory "globtest/a1": permission denied} {posix eacces {permission denied}}} @@ -1341,7 +1341,7 @@ test filename-15.3 {unix specific no complain: no errors, good result} \ # test fails because if an error occurs, the interp's result is reset... glob -nocomplain globTest/a2 globTest/a1/* globTest/a3 } {globTest/a2 globTest/a3} -catch {file attributes globTest/a1 -permissions 0755} +catch {file attributes globTest/a1 -permissions 0o755} test filename-15.4 {unix specific no complain: no errors, good result} \ {unix nonPortable} { # test fails because if an error occurs, the interp's result is reset... |