anne/lyx_mirror
1
0
Fork 0
mirror of https://git.lyx.org/repos/lyx.git synced 2024-11-22 10:00:33 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Corrected displayed file-name for fuzzy and untranslated messages in diff_po.pl

Browse Source
This commit is contained in:
Kornel Benko 2013-09-26 11:34:05 +02:00
parent 4fb67a3b19
commit ac069c3f4b
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
po/diff_po.pl
View File

@ -235,7 +235,9 @@ sub diff_po($$)
if ($param eq "-L") {
my $name = shift(@args);
push(@names, $name);
$switchargs = 1;
}
else {
# ignore other options
}
}
if (! defined($names[0])) {
@ -249,11 +251,6 @@ sub diff_po($$)
die("names = \"", join('" "', @names) . "\"... args = \"" . join('" "', @args) . "\" Expected exactly 2 parameters");
}
if ($switchargs) {
my $tmp = $args[0];
$args[0] = $args[1];
$args[1] = $tmp;
}
&check_po_file_readable($names[0], $args[0]);
&check_po_file_readable($names[1], $args[1]);
@ -390,7 +387,7 @@ sub printExtraMessages($$$)
my @sortedExtraKeys = sort { $a <=> $b;} keys %{$rExtra};
if (@sortedExtraKeys > 0) {
print "Still " . 0 + @sortedExtraKeys . " $type messages found in $rNames->[0]\n";
print "Still " . 0 + @sortedExtraKeys . " $type messages found in $rNames->[1]\n";
for my $l (@sortedExtraKeys) {
print "> line $l: \"" . $rExtra->{$l} . "\"\n";
}