diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-11-09 11:28:19 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-11-09 11:28:19 (GMT) |
commit | 4d0be555a4f1ed502289bf66a443422adbad2070 (patch) | |
tree | 6c4218aafc6e7aa7735a59b43d45e7bf9dc6d7e4 /tests/tcltest.test | |
parent | fabf9b4e5371867db54cc26cabadd71ff07dabc9 (diff) | |
download | tcl-4d0be555a4f1ed502289bf66a443422adbad2070.zip tcl-4d0be555a4f1ed502289bf66a443422adbad2070.tar.gz tcl-4d0be555a4f1ed502289bf66a443422adbad2070.tar.bz2 |
Use octal permissions in testcases
Diffstat (limited to 'tests/tcltest.test')
-rw-r--r-- | tests/tcltest.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/tcltest.test b/tests/tcltest.test index 9b1bb4b..8a0174d 100644 --- a/tests/tcltest.test +++ b/tests/tcltest.test @@ -716,8 +716,8 @@ test tcltest-8.60 {::workingDirectory} { switch -- $::tcl_platform(platform) { unix { - file attributes $notReadableDir -permissions 777 - file attributes $notWriteableDir -permissions 777 + file attributes $notReadableDir -permissions 0o777 + file attributes $notWriteableDir -permissions 0o777 } default { catch {testchmod 0o777 $notWriteableDir} |