diff options
| author | Frédéric Buclin <LpSolit@netscape.net> | 2017-05-06 20:02:52 +0200 |
|---|---|---|
| committer | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2017-06-23 08:05:56 +0100 |
| commit | 14eb1e5893eb7bc6748cf388df7cb05a3f05c7da (patch) | |
| tree | 30a4906269c4401a23e15840581690c0e32e16ef /perl-install/install/gtk.pm | |
| parent | bf6a242fafbfc2baa9b4001141dd75eec8d289a1 (diff) | |
| download | drakx-14eb1e5893eb7bc6748cf388df7cb05a3f05c7da.tar drakx-14eb1e5893eb7bc6748cf388df7cb05a3f05c7da.tar.gz drakx-14eb1e5893eb7bc6748cf388df7cb05a3f05c7da.tar.bz2 drakx-14eb1e5893eb7bc6748cf388df7cb05a3f05c7da.tar.xz drakx-14eb1e5893eb7bc6748cf388df7cb05a3f05c7da.zip | |
Increase the default window size of the installer to 1024x768 (mga#20624)
This permits to correctly display the different panels as some
of them contain quite a lot of data.
Diffstat (limited to 'perl-install/install/gtk.pm')
| -rw-r--r-- | perl-install/install/gtk.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm index ce820a95e..37b31c109 100644 --- a/perl-install/install/gtk.pm +++ b/perl-install/install/gtk.pm @@ -220,7 +220,9 @@ sub init_sizes { ($::rootwidth, $::rootheight) = (Gtk3::Gdk::Screen::width, Gtk3::Gdk::Screen::height); $::stepswidth = $::rootwidth <= 640 ? 0 : 196; ($o->{windowwidth}, $o->{windowheight}) = ($::rootwidth - $::stepswidth, $::rootheight); - ($::real_windowwidth, $::real_windowheight) = (576, 465); + # Adapt the window size to available screen width and height. + $::real_windowwidth = $::rootwidth > 800 ? $::rootwidth - 224 : 576; + $::real_windowheight = $::rootheight > 600 ? $::rootheight - 135 : 465; } sub handle_unsafe_mouse { |