diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-11-26 16:33:41 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-11-26 16:33:41 +0000 |
| commit | 9f2a0ea26a8d8c78a171431793750dfb9453f2af (patch) | |
| tree | 0bd7f47951c1c85cd598b4de4708c98af1346946 /perl-install/interactive_gtk.pm | |
| parent | b9f4dfa941779fade78869728b9393cab1ede012 (diff) | |
| download | drakx-9f2a0ea26a8d8c78a171431793750dfb9453f2af.tar drakx-9f2a0ea26a8d8c78a171431793750dfb9453f2af.tar.gz drakx-9f2a0ea26a8d8c78a171431793750dfb9453f2af.tar.bz2 drakx-9f2a0ea26a8d8c78a171431793750dfb9453f2af.tar.xz drakx-9f2a0ea26a8d8c78a171431793750dfb9453f2af.zip | |
cleanup
Diffstat (limited to 'perl-install/interactive_gtk.pm')
| -rw-r--r-- | perl-install/interactive_gtk.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm index fe22a66b5..44923d996 100644 --- a/perl-install/interactive_gtk.pm +++ b/perl-install/interactive_gtk.pm @@ -189,6 +189,7 @@ sub create_ctree { my $curr = $tree->node_nth(0); #- default value $tree->set_column_auto_resize(0, 1); $tree->set_selection_mode('browse'); + $tree->set_row_height($tree->style->font->ascent + $tree->style->font->descent + 1); $tree->signal_connect(tree_select_row => sub { $curr = $_[1]; if ($curr->row->is_leaf) { @@ -266,8 +267,6 @@ sub create_ctree { &$double_click if $curr->row->is_leaf && $double_click; }); - $tree->set_row_height($tree->style->font->ascent + $tree->style->font->descent + 1); - $tree, sub { my $v = may_apply($e->{format}, $_[0]); $select->($wleaves{$v} || return) if $wleaves{$v} != $tree->selection; |