From 5e0aa799748e40f4f3aff2f506834784cae0ffca Mon Sep 17 00:00:00 2001 From: Frank Lichtenheld Date: Sat, 9 Feb 2008 02:40:14 +0100 Subject: [PATCH] trivial_slice: Use .new as suffix for created files as all other scripts do Most importantly Packages::CommonCode::active depends on that --- bin/trivial_slice | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/bin/trivial_slice b/bin/trivial_slice index 63c6a2e..2f26a0c 100755 --- a/bin/trivial_slice +++ b/bin/trivial_slice @@ -39,14 +39,14 @@ warn "langs=@langs\nfiles=@files\n"; foreach my $file (@files) { my ($name, $path, undef) = fileparse($file,qw(.slices)); - warn "name=$name path=$path out=$path$name.LANG.html.tmp\n"; + warn "name=$name path=$path out=$path$name.LANG.html.new\n"; my %out; foreach my $lang (@langs) { my $ulang = uc($lang); open($out{$ulang}, '>', - "$path$name.$lang.html.tmp") - or die "Couldn't open $path$name.$lang.html.tmp\n"; + "$path$name.$lang.html.new") + or die "Couldn't open $path$name.$lang.html.new\n"; } open my $in, '<', $file @@ -96,7 +96,7 @@ foreach my $file (@files) { foreach my $lang (keys %out) { close($out{$lang}) - or die "Couldn't close $path$name.$lang.html.tmp\n"; + or die "Couldn't close $path$name.$lang.html.new\n"; activate("$path$name.$lang.html"); } -- 2.39.2