diff options
| -rw-r--r-- | perl-install/install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/install/gtk.pm | 7 |
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 { |