Remove unused nopos_ mamber variable.

[lyx.git] / po / pocheck.pl

diff --git a/po/pocheck.pl b/po/pocheck.pl
index b7d8db4acaafa61b8c4f3a7b8eab8239050cfde6..34bd08d8e1ec2ef66449e7589b7314913228d4a8 100755 (executable)
--- a/po/pocheck.pl
+++ b/po/pocheck.pl
@@ -88,12 +88,12 @@ foreach $pofilename ( @ARGV )
           $warn++;
         }
  
-        $msgid_clean = lc($msgid);
+        $msgid_clean  = lc($msgid);
         $msgstr_clean = lc($msgstr);
 
-        $msgid_clean =~ s/\|.*?$//;
-        $msgid_clean =~ s/&([^ ])/$1/;
-        $msgstr_clean =~ s/\|.*?$//;
+        $msgid_clean  =~ s/(.*)\|.*?$/$1/;  # strip xforms shortcuts
+        $msgstr_clean =~ s/(.*)\|.*?$/$1/;
+        $msgid_clean  =~ s/&([^ ])/$1/;     # strip Qt shortcuts
         $msgstr_clean =~ s/&([^ ])/$1/; 
 
         $trans{$msgid_clean}{$msgstr_clean} = [ $msgid, $msgstr ];