summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-08-09 15:53:12 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-08-09 15:53:12 +0000
commit6049cc71321226d99dc04d11be9ffaaf65f28433 (patch)
tree1b811918aa108d6f3acfc3c0419c322433579053 /perl-install
parent38579d7edd7bc5ea0d11872f02720c3c9f90ebd2 (diff)
downloaddrakx-6049cc71321226d99dc04d11be9ffaaf65f28433.tar
drakx-6049cc71321226d99dc04d11be9ffaaf65f28433.tar.gz
drakx-6049cc71321226d99dc04d11be9ffaaf65f28433.tar.bz2
drakx-6049cc71321226d99dc04d11be9ffaaf65f28433.tar.xz
drakx-6049cc71321226d99dc04d11be9ffaaf65f28433.zip
image2f has slightly changed
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm2
-rw-r--r--perl-install/interactive.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 4accdcdc2..25ca7b190 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -752,7 +752,7 @@ when your installation is complete and you restart your system.")),
$in->ask_from_($common, [
{ val => \$lang, separator => '|',
- if_($using_images, image2f => sub { $name2l{$_[0]} =~ /^[a-z]/ ? ('', "langs/lang-$name2l{$_[0]}") : $_[0] }),
+ if_($using_images, image2f => sub { $name2l{$_[0]} =~ /^[a-z]/ && "langs/lang-$name2l{$_[0]}" }),
format => sub { $_[0] =~ /(.*\|)(.*)/ ? $1 . lang::l2name($2) : lang::l2name($_[0]) },
list => \@langs, sort => 0 },
if_(!$::move,
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 324fe3442..df5030883 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -51,7 +51,7 @@ use do_pkgs;
#- tree_expanded boolean telling wether the tree should be wide open by default
#- quit_if_double_click boolean
#- allow_empty_list disables the special cases for 0 and 1 element lists
-#- image2f is a subroutine which takes a value of the list as parameter, and returns an array (text, image_file_name))
+#- image2f is a subroutine which takes a value of the list as parameter, and returns image_file_name
#- entry (the default) (with hidden)
#
#- heritate from this class and you'll get all made interactivity for same steps.