[prev in list] [next in list] [prev in thread] [next in thread]
List: lyx-cvs
Subject: [LyX/master] Corrected displayed file-name for fuzzy and untranslated messages in diff_po.pl
From: Kornel Benko <kornel () lyx ! org>
Date: 2013-09-26 9:36:38
Message-ID: 20130926093638.128B4280488 () lyx ! lyx ! org
[Download RAW message or body]
commit ac069c3f4b4b62d5bff915ade95c0c9e9a4df412
Author: Kornel Benko <kornel@lyx.org>
Date: Thu Sep 26 11:34:05 2013 +0200
Corrected displayed file-name for fuzzy and untranslated messages in diff_po.pl
diff --git a/po/diff_po.pl b/po/diff_po.pl
index cd4d3ef..65462d8 100755
--- a/po/diff_po.pl
+++ b/po/diff_po.pl
@@ -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";
}
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic