diff options
author | mouring <mouring> | 2000-11-08 01:07:51 +0000 |
---|---|---|
committer | mouring <mouring> | 2000-11-08 01:07:51 +0000 |
commit | 1fa3bf732ebca487e78056d99e893d66ecb81c57 (patch) | |
tree | d6c18a4e945620d070b07a33f0e530f02b41d719 /fixpaths | |
parent | b3964f4b284b3af16f3a7a56f28810636fa9df17 (diff) | |
download | openssh-1fa3bf732ebca487e78056d99e893d66ecb81c57.tar.gz |
- (bal) fixpaths fixed to stop it from quitely failing. Patch by
Mark D. Roth <roth@feep.net>
Diffstat (limited to 'fixpaths')
-rwxr-xr-x | fixpaths | 15 |
1 files changed, 7 insertions, 8 deletions
@@ -37,14 +37,13 @@ for $f (@ARGV) { $of = $2.".$ext"; open(IN, "<$f") || die ("$0: input file $f missing!\n"); - if (open(OUT, ">$of")) { - while (<IN>) { - for $s (keys(%def)) { - s#$s#$def{$s}#; - } # for $s - print OUT; - } # while <IN> - } # if (outfile open) + open(OUT, ">$of") || die ("$0: cannot create output file $of: $!\n"); + while (<IN>) { + for $s (keys(%def)) { + s#$s#$def{$s}#; + } # for $s + print OUT; + } # while <IN> } # for $f exit 0; |