Correctly create the expected key for plurals with quotes

Ported from the administration repo:
c67eaa11c0
and
41b0f9fa3a
This commit is contained in:
Joas Schilling 2015-02-18 13:20:38 +01:00
parent 0833a6e332
commit 602845f33e
1 changed files with 5 additions and 2 deletions

View File

@ -153,8 +153,11 @@ elsif( $task eq 'write' ){
elsif( defined( $string->msgstr_n() )){
# plural translations
my @variants = ();
my $identifier = $string->msgid()."::".$string->msgid_plural();
$identifier =~ s/"/_/g;
my $msgid = $string->msgid();
$msgid =~ s/^"(.*)"$/$1/;
my $msgid_plural = $string->msgid_plural();
$msgid_plural =~ s/^"(.*)"$/$1/;
my $identifier = "_" . $msgid."_::_".$msgid_plural . "_";
foreach my $variant ( sort { $a <=> $b} keys( %{$string->msgstr_n()} )){
push( @variants, $string->msgstr_n()->{$variant} );