summaryrefslogtreecommitdiffstats
path: root/perl-install/install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install')
-rw-r--r--perl-install/install/NEWS1
-rw-r--r--perl-install/install/gtk.pm7
2 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index a176b2d34..35f086cdd 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,4 +1,5 @@
- recognize new kernel 5.0 drivers
+- fix screen layout when the framebuffer is > 1024x768 (mga#23904)
Version 18.10 - 3 Feb 2019
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index 37b31c109..094f3617e 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -163,7 +163,8 @@ sub create_steps_window {
],
)
);
-
+
+ $root_window->set_position(GTK_WIN_POS_CENTER_ALWAYS);
$root_window->show_all;
}
@@ -221,8 +222,8 @@ sub init_sizes {
$::stepswidth = $::rootwidth <= 640 ? 0 : 196;
($o->{windowwidth}, $o->{windowheight}) = ($::rootwidth - $::stepswidth, $::rootheight);
# Adapt the window size to available screen width and height.
- $::real_windowwidth = $::rootwidth > 800 ? $::rootwidth - 224 : 576;
- $::real_windowheight = $::rootheight > 600 ? $::rootheight - 135 : 465;
+ $::real_windowwidth = $::rootwidth > 800 ? 800 : 576;
+ $::real_windowheight = $::rootheight > 600 ? 633 : 465;
}
sub handle_unsafe_mouse {