[Po4a-commits] "po4a/lib/Locale/Po4a TeX.pm,1.85,1.86"
Nicolas FRANCOIS
nekral-guest at alioth.debian.org
Mon May 15 15:58:58 UTC 2006
Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv10686/lib/Locale/Po4a
Modified Files:
TeX.pm
Log Message:
Merge some strings.
Index: TeX.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/TeX.pm,v
retrieving revision 1.85
retrieving revision 1.86
diff -u -d -r1.85 -r1.86
--- TeX.pm 15 May 2006 15:56:31 -0000 1.85
+++ TeX.pm 15 May 2006 15:58:56 -0000 1.86
@@ -1324,12 +1324,13 @@
$count++;
goto TEST_TYPE;
} else {
+ my $reason = dgettext("po4a",
+ "An optional argument ".
+ "was provided, but a mandatory one ".
+ "is expected.");
die wrap_ref_mod($self->{ref}, "po4a::tex",
- dgettext("po4a",
- "Command '%s': An optional argument ".
- "was provided, but a mandatory one ".
- "is expected.")."\n",
- $command);
+ dgettext("po4a", "Command '%s': %s")."\n",
+ $command, $reason);
}
if ($have_to_be_translated) {
($t, @e) = translate_buffer($self,$opt,(@$env,$command.$type."#".$count.$type_end{$type}));
@@ -1435,12 +1436,13 @@
$count++;
goto TEST_TYPE;
} else {
+ my $reason = dgettext("po4a",
+ "An optional argument ".
+ "was provided, but a mandatory one ".
+ "is expected.");
die wrap_ref_mod($self->{ref}, "po4a::tex",
- dgettext("po4a",
- "Command '%s': An optional argument ".
- "was provided, but a mandatory one ".
- "is expected.")."\n",
- $command);
+ dgettext("po4a", "Command '%s': %s")."\n",
+ $command, $reason);
}
if ($have_to_be_translated) {
@@ -1523,7 +1525,7 @@
} else {
$check = 0;
$reason = dgettext("po4a",
- "Command '%s': An optional argument was ".
+ "An optional argument was ".
"provided, but a mandatory one is expected.");
}
}
More information about the Po4a-commits
mailing list