summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-11-21 12:49:55 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-11-21 12:49:55 +0000
commitfb108a8322944e736b38c5643b0dd183f065faf8 (patch)
tree8920f62c033ce3c2481d9972e89aa2c8697bbd6e /perl-install
parent77d3fee8502909602022d18165f93de3b44b7cac (diff)
downloaddrakx-fb108a8322944e736b38c5643b0dd183f065faf8.tar
drakx-fb108a8322944e736b38c5643b0dd183f065faf8.tar.gz
drakx-fb108a8322944e736b38c5643b0dd183f065faf8.tar.bz2
drakx-fb108a8322944e736b38c5643b0dd183f065faf8.tar.xz
drakx-fb108a8322944e736b38c5643b0dd183f065faf8.zip
have a fake helpwindow so that wizardwindow shrinks a bit and we don't totally hide "MandrakeMove" logo at bottom
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index 7746dadc3..d151101c5 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -229,7 +229,7 @@ sub init_sizes() {
#- ($::rootheight, $::rootwidth) = (min(768, $::rootheight), min(1024, $::rootwidth));
$::move or $::stepswidth = $::rootwidth <= 640 ? 0 : 160;
($::logowidth, $::logoheight) = $::rootwidth <= 640 ? (0, 0) : (500, 40);
- ($::helpwidth, $::helpheight) = ($::rootwidth - $::stepswidth, 0);
+ ($::helpwidth, $::helpheight) = ($::rootwidth - $::stepswidth, $::move && 15);
($::windowwidth, $::windowheight) = ($::rootwidth - $::stepswidth, $::rootheight - $::helpheight - $::logoheight);
$::move and $::windowwidth -= 100;
}