Update of /cvsroot/po4a/po4a
In directory haydn:/tmp/cvs-serv6590
Modified Files:
po4a-translate
Log Message:
Fix Perl syntax
Index: po4a-translate
===================================================================
RCS file: /cvsroot/po4a/po4a/po4a-translate,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -d -r1.19 -r1.20
--- po4a-translate 30 Apr 2004 23:12:47 -0000 1.19
+++ po4a-translate 30 Apr 2004 23:26:36 -0000 1.20
@@ -227,14 +227,14 @@
my ($percent,$hit,$queries) = $doc->stats();
my $error=0;
-printf STDERR (gettext("%s is %s%% translated (%s of %s strings)"),
- $master_filename,$percent,$hit,$queries),"\n"
+print STDERR sprintf(gettext("%s is %s%% translated (%s of %s strings)"),
+ $master_filename,$percent,$hit,$queries)."\n"
if $verbose;
if ($percent<$threshold) {
- printf STDERR (gettext("ERROR: translation of %s discarded: only %s%% are
translated ; %s%% is needed to keep translations."),
- $master_filename,$percent,$threshold),"\n";
+ print STDERR sprintf(gettext("ERROR: translation of %s discarded: only %s%% are
translated ; %s%% is needed to keep translations."),
+ $master_filename,$percent,$threshold)."\n";
unlink($outfile) if (-e $outfile);
} else {
foreach (@addfiles) {