summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-07-21 16:52:35 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-07-21 16:52:35 +0000
commit064977e7d008fab29afd8fef237ecfc335a3e5be (patch)
tree9e9786f0e3450809f14be70ec6364faee694e167 /perl-install/standalone
parent85db3dcf69f020e8274156bbbc45d7f25e9d7941 (diff)
downloaddrakx-064977e7d008fab29afd8fef237ecfc335a3e5be.tar
drakx-064977e7d008fab29afd8fef237ecfc335a3e5be.tar.gz
drakx-064977e7d008fab29afd8fef237ecfc335a3e5be.tar.bz2
drakx-064977e7d008fab29afd8fef237ecfc335a3e5be.tar.xz
drakx-064977e7d008fab29afd8fef237ecfc335a3e5be.zip
workaround buggy gtk+-2.x that do not wrap textviews when realized
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/harddrake211
1 files changed, 8 insertions, 3 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2
index 13212171c..15ef68568 100755
--- a/perl-install/standalone/harddrake2
+++ b/perl-install/standalone/harddrake2
@@ -322,9 +322,14 @@ $textcolumn->set_min_width(350);
#$textcolumn->set_minmax_width(400);
$textcolumn->set_sizing('GTK_TREE_VIEW_COLUMN_AUTOSIZE');#GROW_ONLY
#$tree->columns_autosize();
-my $path = Gtk2::TreePath->new_first;
-$path->down unless $::isEmbedded;
-$tree->get_selection->select_path($path);
+# Gtk+-2.x workaround for not wrapped textview on first show
+$tree->signal_connect(realize => sub {
+ my $path = Gtk2::TreePath->new_first;
+ $path->down;
+ $tree->get_selection->select_path($path);
+ $path->up;
+ $tree->get_selection->select_path($path);
+});
$w->{rwindow}->show_all;
undef $wait;
gtkset_mousecursor_normal();