diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rwxr-xr-x | fixpaths | 15 |
2 files changed, 11 insertions, 9 deletions
@@ -1,7 +1,10 @@ | |||
1 | 20001107 | 1 | 20001107 |
2 | - (bal) acconfig.in - removed the double "USE_PIPES" entry. | 2 | - (bal) acconfig.in - removed the double "USE_PIPES" entry. Patch by |
3 | Mark Miller <markm@swoon.net> | ||
3 | - (bal) sshd.init files corrected to assign $? to RETVAL. Patch by | 4 | - (bal) sshd.init files corrected to assign $? to RETVAL. Patch by |
4 | Jarno Huuskonen <jhuuskon@messi.uku.fi> | 5 | Jarno Huuskonen <jhuuskon@messi.uku.fi> |
6 | - (bal) fixpaths fixed to stop it from quitely failing. Patch by | ||
7 | Mark D. Roth <roth@feep.net> | ||
5 | 8 | ||
6 | 20001106 | 9 | 20001106 |
7 | - (djm) Use Jim's new 1.0.3 askpass in Redhat RPMs | 10 | - (djm) Use Jim's new 1.0.3 askpass in Redhat RPMs |
@@ -37,14 +37,13 @@ for $f (@ARGV) { | |||
37 | $of = $2.".$ext"; | 37 | $of = $2.".$ext"; |
38 | 38 | ||
39 | open(IN, "<$f") || die ("$0: input file $f missing!\n"); | 39 | open(IN, "<$f") || die ("$0: input file $f missing!\n"); |
40 | if (open(OUT, ">$of")) { | 40 | open(OUT, ">$of") || die ("$0: cannot create output file $of: $!\n"); |
41 | while (<IN>) { | 41 | while (<IN>) { |
42 | for $s (keys(%def)) { | 42 | for $s (keys(%def)) { |
43 | s#$s#$def{$s}#; | 43 | s#$s#$def{$s}#; |
44 | } # for $s | 44 | } # for $s |
45 | print OUT; | 45 | print OUT; |
46 | } # while <IN> | 46 | } # while <IN> |
47 | } # if (outfile open) | ||
48 | } # for $f | 47 | } # for $f |
49 | 48 | ||
50 | exit 0; | 49 | exit 0; |