summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive_newt.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-05-04 18:31:12 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-05-04 18:31:12 +0000
commit4e096379cad750ecfdb7ddd78eeae899380a7696 (patch)
treed8d20a99442163647d9daac826478cb5695f4312 /perl-install/interactive_newt.pm
parenta653f2e1d6d6ff8ee49c647e747bdb5b549429c2 (diff)
downloaddrakx-4e096379cad750ecfdb7ddd78eeae899380a7696.tar
drakx-4e096379cad750ecfdb7ddd78eeae899380a7696.tar.gz
drakx-4e096379cad750ecfdb7ddd78eeae899380a7696.tar.bz2
drakx-4e096379cad750ecfdb7ddd78eeae899380a7696.tar.xz
drakx-4e096379cad750ecfdb7ddd78eeae899380a7696.zip
no_comment
Diffstat (limited to 'perl-install/interactive_newt.pm')
-rw-r--r--perl-install/interactive_newt.pm1
1 files changed, 0 insertions, 1 deletions
diff --git a/perl-install/interactive_newt.pm b/perl-install/interactive_newt.pm
index 67238844b..dc21c27e2 100644
--- a/perl-install/interactive_newt.pm
+++ b/perl-install/interactive_newt.pm
@@ -128,7 +128,6 @@ sub ask_from_entries_refW {
#- $_->{type} = "entry" if $_->{type} eq "list" && !$_->{not_edit};
${$_->{val}} ||= '';
if ($_->{type} eq "list") {
- $_->{val} ||= $_->{list}[0];
my $w = Newt::Component::Listbox(-1, -1, 1, 0);
$w->ListboxSetWidth(20);
$w->ListboxAddEntry($_) foreach @{$_->{list}};