diff options
Diffstat (limited to 'bin')
| -rw-r--r-- | bin/ksh/tests/th | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bin/ksh/tests/th b/bin/ksh/tests/th index c2b821f9239..eb9c6848c93 100644 --- a/bin/ksh/tests/th +++ b/bin/ksh/tests/th @@ -364,6 +364,7 @@ run_test $len = index($rest, $c, 1) - 1; $name = substr($rest, 1, $len); $rest = substr($rest, 2 + $len); + $perm = oct($perm) if $perm =~ /^\d+$/; if ($type eq 'file') { return undef if !&write_file($name, $rest); if (!chmod($perm, $name)) { @@ -550,7 +551,7 @@ scrub_dir local($file); if (!opendir(DIR, $dir)) { - print STDERR "$prog: couldn't open direcotry $dir - $!\n"; + print STDERR "$prog: couldn't open directory $dir - $!\n"; return undef; } while ($file = readdir(DIR)) { |