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 | 0cb480df70afc69c2a1637894dddd3f0b4e6d351 (patch) | |
| tree | 6d52a7e94842e5d94b26a36ca09c907ae00c94b5 /tests/unixFCmd.test | |
| parent | 96410478b940f8a102bb8d888524569e4c1e873c (diff) | |
| download | tcl-0cb480df70afc69c2a1637894dddd3f0b4e6d351.zip tcl-0cb480df70afc69c2a1637894dddd3f0b4e6d351.tar.gz tcl-0cb480df70afc69c2a1637894dddd3f0b4e6d351.tar.bz2 | |
Finally, use correct octal notation which works in Tcl 9 as well.
Diffstat (limited to 'tests/unixFCmd.test')
| -rw-r--r-- | tests/unixFCmd.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/unixFCmd.test b/tests/unixFCmd.test index 3755fed..2d227fe 100644 --- a/tests/unixFCmd.test +++ b/tests/unixFCmd.test @@ -59,7 +59,7 @@ if {[testConstraint unix]} { } proc openup {path} { - testchmod 0777 $path + testchmod 0o777 $path if {[file isdirectory $path]} { catch { foreach p [glob -directory $path *] { |