]> git.deb.at Git - deb/packages.git/commitdiff
trivial_slice: Use .new as suffix for created files as all other scripts do
authorFrank Lichtenheld <frank@lichtenheld.de>
Sat, 9 Feb 2008 01:40:14 +0000 (02:40 +0100)
committerFrank Lichtenheld <frank@lichtenheld.de>
Sat, 9 Feb 2008 01:41:57 +0000 (02:41 +0100)
Most importantly Packages::CommonCode::active depends on that

bin/trivial_slice

index 63c6a2e78261850958036a3e3a115d874b1b456d..2f26a0c2d20d69054aedb2d845cb204938d657d6 100755 (executable)
@@ -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");
     }