diff options
| -rw-r--r-- | perl-install/lang.pm | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 21ab7d993..09b2992cf 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -701,15 +701,6 @@ my @during_install__lang_having_their_LC_CTYPE = qw(ja ko ta); #- ------------------- -sub list { - my (%options) = @_; - my @l = list_langs(); - if ($options{exclude_non_installed_langs}) { - @l = grep { -e "/usr/share/locale/$_/LC_CTYPE" } @l; - } - @l; -} - sub l2console_font { my ($locale, $during_install) = @_; my $c = $charsets{l2charset($locale->{lang}) || return} or return; |