From f5647e17e10a87a233493899492ebf8de933303f Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 1 Sep 2008 16:28:39 +0000 Subject: (create_widgets_block) fix size of right aligned labels by not adding them to size group --- perl-install/NEWS | 1 + perl-install/install/NEWS | 1 + perl-install/interactive/gtk.pm | 2 +- 3 files changed, 3 insertions(+), 1 deletion(-) diff --git a/perl-install/NEWS b/perl-install/NEWS index dd392d7bd..4c227dd8e 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -2,6 +2,7 @@ o make all windows are "dialog", so that gurpmi.addmedia during install displays nicely o fix alignment of check buttons + o fix size of right aligned labels o fix sizing radio buttons' labels (infamous 6 years old gnome bug #101968) o prevent big combo boxes to cause an horizontall scrollbar to appear by diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 5dfe58b61..81f00fa3f 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -5,6 +5,7 @@ - if network access, configure urpmi with --mirrorlist --distrib, and install updates. This replaces the previous "Install Updates" step. - fix alignment of check buttons +- fix size of right aligned labels - fix sizing radio buttons' labels (infamous 6 years old gnome bug #101968) - further improvements to the "bootloader", "desktop" & "partitionning" steps - prevent big combo boxes to cause an horizontall scrollbar to appear by diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index 85e503d4b..e575de132 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -632,7 +632,7 @@ sub create_widgets_block { my $label_w; if ($e->{label} || !$e->{no_indent}) { $label_w = gtknew('Label_Left', text_markup => $e->{label} || '', - size_group => $label_sizegrp, alignment => [ 0, 0.5 ]); + if_($e->{alignment} ne 'right', size_group => $label_sizegrp), alignment => [ 0, 0.5 ]); $realw_sizegrp->add_widget($e->{real_w}); } -- cgit v1.2.1