diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2008-08-13 15:32:14 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2008-08-13 15:32:14 +0000 |
| commit | ac92166bcdf01373a9c77aaad3a27476c755b288 (patch) | |
| tree | a3eb8bbc1c4a360496fc129a8d4d1c7800f249de /perl-install/install/gtk.pm | |
| parent | ede49049905815814b53b3083245f50d926067d8 (diff) | |
| download | drakx-ac92166bcdf01373a9c77aaad3a27476c755b288.tar drakx-ac92166bcdf01373a9c77aaad3a27476c755b288.tar.gz drakx-ac92166bcdf01373a9c77aaad3a27476c755b288.tar.bz2 drakx-ac92166bcdf01373a9c77aaad3a27476c755b288.tar.xz drakx-ac92166bcdf01373a9c77aaad3a27476c755b288.zip | |
(create_steps_window) factorize height value (needed for next commits)
Diffstat (limited to 'perl-install/install/gtk.pm')
| -rw-r--r-- | perl-install/install/gtk.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm index b403a3e38..5b7b4dcc6 100644 --- a/perl-install/install/gtk.pm +++ b/perl-install/install/gtk.pm @@ -139,9 +139,10 @@ sub create_steps_window { } my $offset = 10; + my $height = 500; $o->{steps_widget} = gtknew('Fixed', widget_name => 'Steps', pixbuf_file => 'left-background', - has_window => 1, x => 0, y => 0, height => 500, width => $::stepswidth, # -1 + has_window => 1, x => 0, y => 0, height => $height, width => $::stepswidth, # -1 child => gtknew('VBox', spacing => 6, width => ($::stepswidth - $offset), children_tight => \@l)); $o->{steps_widget}->put( # FIXME: not RTL compliant (lang::text_direction_rtl() ? ...) |