From 29c22b52682692a630218342d1997c803a3b487b Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Sat, 14 May 2011 17:08:56 +0100 Subject: Rename safer_open() to open_new(), and eliminate the first parameter. Update the SHA256s where necessary in the generated files. --- regen_perly.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'regen_perly.pl') diff --git a/regen_perly.pl b/regen_perly.pl index ec591c5b42..668f1642fe 100644 --- a/regen_perly.pl +++ b/regen_perly.pl @@ -99,10 +99,10 @@ $tablines .= make_type_tab($y_file, $tablines); my $read_only = read_only_top(lang => 'C', by => $0, from => $y_file); -my $act_fh = safer_open("$act_file-new", $act_file); +my $act_fh = open_new($act_file); print $act_fh $read_only, $actlines; -my $tab_fh = safer_open("$tab_file-new", $tab_file); +my $tab_fh = open_new($tab_file); print $tab_fh $read_only, $tablines; unlink $tmpc_file; @@ -112,7 +112,7 @@ unlink $tmpc_file; # C<#line 188 "perlytmp.h"> gets picked up by make depend, so remove them. open my $tmph_fh, '<', $tmph_file or die "Can't open $tmph_file: $!\n"; -my $h_fh = safer_open("$h_file-new", $h_file); +my $h_fh = open_new($h_file); print $h_fh $read_only; -- cgit v1.2.1