diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-07-17 18:43:55 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-07-17 18:43:55 (GMT) |
| commit | d2d54ff3de674eadeb05d439b443e1c2658caf8f (patch) | |
| tree | 6d52a7e94842e5d94b26a36ca09c907ae00c94b5 /tests/tcltest.test | |
| parent | eaf423b505ddce9294e0a649b65dca4fed9b5de1 (diff) | |
| download | tcl-d2d54ff3de674eadeb05d439b443e1c2658caf8f.zip tcl-d2d54ff3de674eadeb05d439b443e1c2658caf8f.tar.gz tcl-d2d54ff3de674eadeb05d439b443e1c2658caf8f.tar.bz2 | |
Finally, use correct octal notation which works in Tcl 9 as well.
Diffstat (limited to 'tests/tcltest.test')
| -rw-r--r-- | tests/tcltest.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/tcltest.test b/tests/tcltest.test index 5894308..e66678b 100644 --- a/tests/tcltest.test +++ b/tests/tcltest.test @@ -717,7 +717,7 @@ switch -- $::tcl_platform(platform) { file attributes $notWriteableDir -permissions 777 } default { - catch {testchmod 0777 $notWriteableDir} + catch {testchmod 0o777 $notWriteableDir} catch {file attributes $notWriteableDir -readonly 0} } } |