summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-17 10:16:29 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-17 10:16:29 +0000
commite1cc7c5a066da1237081fd15c228bff504aa60c3 (patch)
treea4ba8f1ce401ef695bb5b1855b087b9d3c66dc8a
parent2c618f87c53335cdc09312b88a26d8f61935e8e9 (diff)
downloaddrakx-e1cc7c5a066da1237081fd15c228bff504aa60c3.tar
drakx-e1cc7c5a066da1237081fd15c228bff504aa60c3.tar.gz
drakx-e1cc7c5a066da1237081fd15c228bff504aa60c3.tar.bz2
drakx-e1cc7c5a066da1237081fd15c228bff504aa60c3.tar.xz
drakx-e1cc7c5a066da1237081fd15c228bff504aa60c3.zip
lang::list() is unused, dropping it
-rw-r--r--perl-install/lang.pm9
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;