summaryrefslogtreecommitdiffstats
path: root/perl-install/install/gtk.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-09-22 13:46:18 +0000
committerThierry Vignaud <tv@mandriva.org>2008-09-22 13:46:18 +0000
commit57f06195fbc4ed4821443b2a640920b3f85375d1 (patch)
treed2ba2983cc0888017832eaa921950968f09a1c86 /perl-install/install/gtk.pm
parent0881f624027305b7c6cf8f4f86ccaf770e0f1f14 (diff)
downloaddrakx-57f06195fbc4ed4821443b2a640920b3f85375d1.tar
drakx-57f06195fbc4ed4821443b2a640920b3f85375d1.tar.gz
drakx-57f06195fbc4ed4821443b2a640920b3f85375d1.tar.bz2
drakx-57f06195fbc4ed4821443b2a640920b3f85375d1.tar.xz
drakx-57f06195fbc4ed4821443b2a640920b3f85375d1.zip
(create_step_box,create_steps_window) set spacing according to specs
Diffstat (limited to 'perl-install/install/gtk.pm')
-rw-r--r--perl-install/install/gtk.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index 1655f6743..0055221d9 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -105,8 +105,9 @@ sub install_theme {
}
sub create_step_box {
- gtknew('HBox', spacing => 7, children => [
+ gtknew('HBox', spacing => 0, children => [
@_,
+ 0, gtknew('Alignment', width => 24),
]);
}
@@ -122,7 +123,6 @@ sub create_steps_window {
my $category = sub {
create_step_box(
1, gtknew('Label_Right', text_markup => '<b>' . uc($_[0]) . '</b>', widget_name => 'Step-categories'),
- 0, gtknew('Image', file => 'steps_off.png'),
);
};
@@ -137,6 +137,7 @@ sub create_steps_window {
$steps{steps}{$_}{img} = $img;
push @l, create_step_box(
1, $steps{steps}{$_}{text} = gtknew('Label_Right', text => translate($o->{steps}{$_}{text})),
+ 0, gtknew('Alignment', width => 6),
0, $img,
);
}