diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-05-14 17:08:56 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-05-19 10:18:14 +0100 |
| commit | 29c22b52682692a630218342d1997c803a3b487b (patch) | |
| tree | 292f5591f4269ba0567791e22c5a87e2f93ba358 /regen/overload.pl | |
| parent | fb8ff1db5449e3c679d9193f00ffaa0a15f88fd7 (diff) | |
| download | perl-29c22b52682692a630218342d1997c803a3b487b.tar.gz | |
Rename safer_open() to open_new(), and eliminate the first parameter.
Update the SHA256s where necessary in the generated files.
Diffstat (limited to 'regen/overload.pl')
| -rw-r--r-- | regen/overload.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/regen/overload.pl b/regen/overload.pl index 88e2153e23..5ddce69e12 100644 --- a/regen/overload.pl +++ b/regen/overload.pl @@ -30,10 +30,10 @@ while (<DATA>) { push @names, $name; } -my $c = safer_open('overload.c-new', 'overload.c'); -my $h = safer_open('overload.h-new', 'overload.h'); +my $c = open_new('overload.c'); +my $h = open_new('overload.h'); mkdir("lib/overload", 0777) unless -d 'lib/overload'; -my $p = safer_open('lib/overload/numbers.pm-new', 'lib/overload/numbers.pm'); +my $p = open_new('lib/overload/numbers.pm'); print $p read_only_top(lang => 'Perl', by => 'regen/overload.pl', file => 'lib/overload/numbers.pm', copyright => [2008]); |