From 0aa7a9e98c3b51085c87aa13d61eef8e3f694626 Mon Sep 17 00:00:00 2001
From: pad <pad@mandriva.com>
Date: Tue, 14 Sep 1999 14:50:50 +0000
Subject: *** empty log message ***

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

(limited to 'perl-install/interactive_gtk.pm')

diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm
index ad4aa36ba..4f01fcbb7 100644
--- a/perl-install/interactive_gtk.pm
+++ b/perl-install/interactive_gtk.pm
@@ -88,6 +88,7 @@ sub ask_from_entries_refW {
 	    $depth_combo->entry->set_editable(!$_->{not_edit});
 	    $depth_combo->set_popdown_strings(@{$_->{list}});
 	    $depth_combo->disable_activate;
+	    $_->{val} ||= $_->{list}[0];
 	    $depth_combo;
 	} else {
 	    new Gtk::Entry;
-- 
cgit v1.2.1