summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-08-27 18:40:51 +0000
committerThierry Vignaud <tv@mandriva.org>2008-08-27 18:40:51 +0000
commit226b96a8924c0783bf415612c313e2b566e0ee2a (patch)
treeafb82c1e0d407ff847395cbe67359f2a6a6dbccb /perl-install/interactive
parent2e91e977577adccd7c0411afa44084308010d9b3 (diff)
downloaddrakx-226b96a8924c0783bf415612c313e2b566e0ee2a.tar
drakx-226b96a8924c0783bf415612c313e2b566e0ee2a.tar.gz
drakx-226b96a8924c0783bf415612c313e2b566e0ee2a.tar.bz2
drakx-226b96a8924c0783bf415612c313e2b566e0ee2a.tar.xz
drakx-226b96a8924c0783bf415612c313e2b566e0ee2a.zip
(create_treeview_list) fix several Gtk-CRITICAL
Diffstat (limited to 'perl-install/interactive')
-rw-r--r--perl-install/interactive/gtk.pm1
1 files changed, 1 insertions, 0 deletions
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 });
};