[Po4a-devel][CVS] po4a po4a-translate,1.19,1.20

Denis Barbier po4a-devel@lists.alioth.debian.org
Fri, 30 Apr 2004 23:26:38 +0000


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) {