summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/lang.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index 298d4fc74..abdab134a 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -339,6 +339,12 @@ sub langs {
grep { $l->{$_} } keys %$l;
}
+sub langsLANGUAGE {
+ my ($l) = @_;
+ my @l = $l->{all} ? list() : langs($l);
+ uniq(map { split ':', $languages{$_}[3] } @l);
+}
+
sub pack_langs {
my ($l) = @_;
$l->{all} ? 'all' : join ':', uniq(map { $languages{$_}[3] } langs($l));