diff options
author | Nicholas Clark <nick@ccl4.org> | 2011-05-14 16:30:01 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2011-05-19 10:18:14 +0100 |
commit | fb8ff1db5449e3c679d9193f00ffaa0a15f88fd7 (patch) | |
tree | 234aa7b9980265a07cdd896132e4d01af3a4af74 /Porting/makemeta | |
parent | 5d59f95a83d2d9d7301ce45f2d288c286a51219b (diff) | |
download | perl-fb8ff1db5449e3c679d9193f00ffaa0a15f88fd7.tar.gz |
In makemeta, pass the final file name as the second argument to safer_open()
With this change, all callers to safer_open() pass 2 arguments.
Diffstat (limited to 'Porting/makemeta')
-rw-r--r-- | Porting/makemeta | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Porting/makemeta b/Porting/makemeta index c81aec59d4..37987a7c0b 100644 --- a/Porting/makemeta +++ b/Porting/makemeta @@ -50,7 +50,7 @@ my %dirs; @dirs = map { " - $_" } sort { lc $a cmp lc $b } @dirs; -my $fh = safer_open($new_file); +my $fh = safer_open($new_file, $file); local $" = "\n"; print $fh <<"EOI"; |