summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-02 13:53:18 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-02 13:53:18 +0000
commit699251f9dfdfae5d5caa49591fa89c96d603fc2d (patch)
treed27e4852547c47c9a9b97038618c710270cbb203 /perl-install/ugtk2.pm
parent7b3e6c7768cdb0e4b095ccc769321e609809787c (diff)
downloaddrakx-699251f9dfdfae5d5caa49591fa89c96d603fc2d.tar
drakx-699251f9dfdfae5d5caa49591fa89c96d603fc2d.tar.gz
drakx-699251f9dfdfae5d5caa49591fa89c96d603fc2d.tar.bz2
drakx-699251f9dfdfae5d5caa49591fa89c96d603fc2d.tar.xz
drakx-699251f9dfdfae5d5caa49591fa89c96d603fc2d.zip
ensure the window is big enough in 640x480: remove logo and steps window
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 0c6d0dbed..c56565a96 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -736,8 +736,8 @@ sub new {
$::WizardWindow->add($::WizardTable);
if ($::isInstall) {
- $::WizardTable->set_size_request($::windowwidth * 0.90, $::windowheight * 0.73);
- $::WizardWindow->set_uposition($::stepswidth + $::windowwidth * 0.04, $::logoheight + $::windowheight * 0.15);
+ $::WizardTable->set_size_request($::windowwidth * 0.90, $::windowheight * ($::logoheight ? 0.73 : 0.9));
+ $::WizardWindow->set_uposition($::stepswidth + $::windowwidth * 0.04, $::logoheight + $::windowheight * ($::logoheight ? 0.15 : 0.05));
$::WizardWindow->signal_connect(key_press_event => sub {
my (undef, $event) = @_;
my $d = ${{ Gtk2::Gdk::Event::Key->Sym_F1 => 'help',