diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/common.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm index a65f4ddd8..73c1d9adb 100644 --- a/perl-install/common.pm +++ b/perl-install/common.pm @@ -368,6 +368,9 @@ sub list_skels { sub translate { my ($s) = @_; + if (ref($s) eq 'ARRAY') { + $s = $s->[0] == 1 ? "singular\0$s->[1]" : "plural\0$s->[2]"; + } my ($lang) = $ENV{LANGUAGE} || $ENV{LC_MESSAGES} || $ENV{LC_ALL} || $ENV{LANG} || 'en'; require lang; |