From 226b96a8924c0783bf415612c313e2b566e0ee2a Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 27 Aug 2008 18:40:51 +0000
Subject: (create_treeview_list) fix several Gtk-CRITICAL

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

diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm
index 368beddab..dd3cfc7f0 100644
--- a/perl-install/interactive/gtk.pm
+++ b/perl-install/interactive/gtk.pm
@@ -87,6 +87,7 @@ sub create_treeview_list {
     
     my $select = sub {
 	my ($path) = @_;
+	return if !$list_tv->get_model;
 	$list_tv->set_cursor($path, undef, 0);
 	Glib::Timeout->add(100, sub { $list_tv->scroll_to_cell($path, undef, 1, 0.5, 0); 0 });
     };
-- 
cgit v1.2.1