summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive
diff options
context:
space:
mode:
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 });
};