X-Git-Url: https://git.lyx.org/gitweb/?a=blobdiff_plain;f=po%2Fpocheck.pl;h=9dd416026af21ff708e7b845e32e50a5e2fa02e1;hb=9e29dc2338842568de166cef8cee88de9210a84b;hp=df25fdad3bda069038895a4c97bbb428a521000b;hpb=fa674176fde42e8011f9716e2b270bd5a95d983f;p=lyx.git diff --git a/po/pocheck.pl b/po/pocheck.pl index df25fdad3b..9dd416026a 100755 --- a/po/pocheck.pl +++ b/po/pocheck.pl @@ -49,10 +49,10 @@ delete $options{i} if $silent_mode; my $check_args = (!%options or defined($options{a})); my $check_colons = (!%options or defined($options{c})); -my $check_spaces = (!%options or defined($options{m})); +my $check_spaces = (!%options or defined($options{s})); my $check_periods = (!%options or defined($options{p})); my $check_qt = (!%options or defined($options{q})); -my $check_menu = (!%options or defined($options{s})); +my $check_menu = (!%options or defined($options{m})); my $check_trans = (!%options or defined($options{t})); my %trans; @@ -108,6 +108,9 @@ foreach my $pofilename ( @ARGV ) { # (surely that is always $msgstr?) next if ($msgid eq "" or $msgstr eq ""); + # discard [[...]] from the end of msgid, this is used only as hint to translation + $msgid =~ s/\[\[.*\]\]$//; + # Check for matching %1$s, etc. if ($check_args) { my @argstrs = ( $msgid =~ m/%(\d)\$s/g );