From c383affd4bd0e2c054575c038eda07db03effcb0 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 22 Jun 2000 19:57:09 +0000
Subject: *** empty log message ***

---
 perl-install/interactive.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 96313f199..6f7b74fd0 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -228,6 +228,7 @@ sub ask_from_entries_ref($$$$;$%) {
 	    { val => $_ }
 	} else {
 	    if (@{$_->{list} || []} > 1) {
+		add2hash($_, { not_edit => 1 })
 		add2hash_($_, { type => 'list' });
 		${$_->{val}} = $_->{list}[0] if $_->{not_edit} && !member(${$_->{val}}, @{$_->{list}});
 	    }
-- 
cgit v1.2.1