diff options
author | Guillaume Cottenceau <gc@mandriva.com> | 2003-10-16 15:33:43 +0000 |
---|---|---|
committer | Guillaume Cottenceau <gc@mandriva.com> | 2003-10-16 15:33:43 +0000 |
commit | 4d89878fec3fb80ed273f478745cb78052bad69c (patch) | |
tree | 3833a6e2e5ddca775532eba4d5a04ab35ffde86f /perl-install | |
parent | da81840e6ea65a936da52b1f236080047d1efb6a (diff) | |
download | drakx-4d89878fec3fb80ed273f478745cb78052bad69c.tar drakx-4d89878fec3fb80ed273f478745cb78052bad69c.tar.gz drakx-4d89878fec3fb80ed273f478745cb78052bad69c.tar.bz2 drakx-4d89878fec3fb80ed273f478745cb78052bad69c.tar.xz drakx-4d89878fec3fb80ed273f478745cb78052bad69c.zip |
no steps in move mode; for the moment, no logo as well, we'll see what graphical aspect look like with ln
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_gtk.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm index 3025ee395..df607c422 100644 --- a/perl-install/install_gtk.pm +++ b/perl-install/install_gtk.pm @@ -225,8 +225,8 @@ sub init_sizes() { ($::rootwidth, $::rootheight) = (Gtk2::Gdk->screen_width, Gtk2::Gdk->screen_height); $::live and $::rootheight -= 80; #- ($::rootheight, $::rootwidth) = (min(768, $::rootheight), min(1024, $::rootwidth)); - $::stepswidth = $::rootwidth <= 640 ? 0 : 160; - ($::logowidth, $::logoheight) = $::rootwidth <= 640 ? (0, 0) : (500, 40); + $::move or $::stepswidth = $::rootwidth <= 640 ? 0 : 160; + $::move or ($::logowidth, $::logoheight) = $::rootwidth <= 640 ? (0, 0) : (500, 40); ($::helpwidth, $::helpheight) = ($::rootwidth - $::stepswidth, 0); ($::windowwidth, $::windowheight) = ($::rootwidth - $::stepswidth, $::rootheight - $::helpheight - $::logoheight); } |