From 4df639530981650a0aa8a1fa4b069f694718a4a6 Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Thu, 8 Oct 2009 18:02:20 +0000 Subject: improve a bit the layout --- perl-install/fs/partitioning_wizard.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install') diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index 2fd719d8d..455226735 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -338,6 +338,7 @@ sub create_display_box { ugtk2::gtkset_size_request($win_size_label, 150, 20); ugtk2::gtkpack__($desc, $win_size_label); + $win_size_label->set_alignment(0,0.5); $ev = Gtk2::EventBox->new(); $ev->add(Gtk2::Label->new(" " x 4)); $ev->set_name("PART_ext4"); @@ -345,6 +346,7 @@ sub create_display_box { my $mdv_size_label = Gtk2::Label->new(); ugtk2::gtkset_size_request($mdv_size_label, 150, 20); ugtk2::gtkpack__($desc, $mdv_size_label); + $mdv_size_label->set_alignment(0,0.5); $hpane->signal_connect('size-allocate' => sub { my (undef, $alloc) = @_; $part->{width} = $alloc->width; -- cgit v1.2.1