@@ -, +, @@ sure other processes didn't magically increase/decrease the number. $ perl translate update {lang code} generated 10 temporary files for me (2x5 po files). After removing those ten files, and applying the patch, no other files were generated. --- misc/translator/tmpl_process3.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) --- a/misc/translator/tmpl_process3.pl +++ a/misc/translator/tmpl_process3.pl @@ -353,8 +353,8 @@ if ($action eq 'create') { error_normal "Text extraction failed: $xgettext: $!\n", undef; error_additional "Will not run msgmerge\n", undef; } -# unlink $tmpfile1 || warn_normal "$tmpfile1: unlink failed: $!\n", undef; -# unlink $tmpfile2 || warn_normal "$tmpfile2: unlink failed: $!\n", undef; + unlink $tmpfile1 || warn_normal "$tmpfile1: unlink failed: $!\n", undef; + unlink $tmpfile2 || warn_normal "$tmpfile2: unlink failed: $!\n", undef; } elsif ($action eq 'update') { my($tmph1, $tmpfile1) = tmpnam(); @@ -386,8 +386,8 @@ if ($action eq 'create') { error_normal "Text extraction failed: $xgettext: $!\n", undef; error_additional "Will not run msgmerge\n", undef; } -# unlink $tmpfile1 || warn_normal "$tmpfile1: unlink failed: $!\n", undef; -# unlink $tmpfile2 || warn_normal "$tmpfile2: unlink failed: $!\n", undef; + unlink $tmpfile1 || warn_normal "$tmpfile1: unlink failed: $!\n", undef; + unlink $tmpfile2 || warn_normal "$tmpfile2: unlink failed: $!\n", undef; } elsif ($action eq 'install') { if(!defined($out_dir)) { --