summaryrefslogtreecommitdiffstats
path: root/perl-install/install_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-03-17 17:18:15 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-03-17 17:18:15 +0000
commit2e1d91265944c55ce065c0b3af64057ab5e5a132 (patch)
treeb14d0d6ed2fee4182b2c1b0c647b2a274538fbaa /perl-install/install_gtk.pm
parent22c73eec9b3e53ba62f65db88f6b54b8f9712b88 (diff)
downloaddrakx-2e1d91265944c55ce065c0b3af64057ab5e5a132.tar
drakx-2e1d91265944c55ce065c0b3af64057ab5e5a132.tar.gz
drakx-2e1d91265944c55ce065c0b3af64057ab5e5a132.tar.bz2
drakx-2e1d91265944c55ce065c0b3af64057ab5e5a132.tar.xz
drakx-2e1d91265944c55ce065c0b3af64057ab5e5a132.zip
enlarge steps window (no pb since the window is invisible) (bugzilla #8985)
Diffstat (limited to 'perl-install/install_gtk.pm')
-rw-r--r--perl-install/install_gtk.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index 3e300d62b..c7086f915 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -118,7 +118,7 @@ sub install_theme {
load_rc($o, $o->{theme} ||= default_theme($o));
load_font($o);
- $::move or gtkset_background(@background);
+ gtkset_background(@background) if !$::move;
}
#------------------------------------------------------------------------------
@@ -234,7 +234,7 @@ q(<fontconfig>
sub init_sizes() {
($::rootwidth, $::rootheight) = (Gtk2::Gdk->screen_width, Gtk2::Gdk->screen_height);
#- ($::rootheight, $::rootwidth) = (min(768, $::rootheight), min(1024, $::rootwidth));
- $::move or $::stepswidth = $::rootwidth <= 640 ? 0 : 160;
+ $::stepswidth = $::rootwidth <= 640 ? 0 : 200 if !$::move;
($::logowidth, $::logoheight) = $::rootwidth <= 640 ? (0, 0) : (500, 40);
($::helpwidth, $::helpheight) = ($::rootwidth - $::stepswidth, $::move && 15);
($::windowwidth, $::windowheight) = ($::rootwidth - $::stepswidth, $::rootheight - $::helpheight - $::logoheight);