diff options
-rw-r--r-- | NEWS | 1 | ||||
-rwxr-xr-x | draklive-install | 25 |
2 files changed, 19 insertions, 7 deletions
@@ -1,3 +1,4 @@ +- increase window size when display size is > 800x600 (mga#23435) - revert to rebooting after completing install from boot menu - locate live medium from /run/mgalive/basedev instead of from disk label - only remove unused locales and drivers from installed system diff --git a/draklive-install b/draklive-install index a2ae851..4f1231b 100755 --- a/draklive-install +++ b/draklive-install @@ -20,8 +20,11 @@ use MDK::Common; use common; use feature qw(state); use File::Basename; +use ugtk3; -($::real_windowwidth, $::real_windowheight) = (600, 400); +($::rootwidth, $::rootheight) = (Gtk3::Gdk::Screen::width, Gtk3::Gdk::Screen::height); +$::real_windowwidth = $::rootwidth > 800 ? 750 : 600; +$::real_windowheight = $::rootheight > 600 ? 500 : 400; { use diskdrake::interactive; @@ -104,11 +107,17 @@ sub display_start_message() { local $::isStandalone = $has_running_wm; # center me if run in xsetup.d script mygtk3::enable_quit_popup(1); my $w = ugtk3->new(N("Mageia Live")); + my $dialogue = ugtk3::gtknew('VBox', children_centered => [ + ugtk3::gtkcreate_img("MageiaLive-install"), + ugtk3::gtknew('Label', height => 5), + ugtk3::gtknew('Label', text => N("This wizard will help you to install the live distribution.")), + ]); + $dialogue->set_vexpand(1); ugtk3::gtkadd($w->{window}, - ugtk3::gtkcreate_img("MageiaLive-install"), - ugtk3::gtknew('Label', height => 5), - N("This wizard will help you to install the live distribution."), - ugtk3::create_okcancel($w)); + ugtk3::gtknew('VBox', children_tight => [ + $dialogue, + ugtk3::create_okcancel($w), + ])); $w->{ok}->grab_focus; $w->main; } @@ -428,10 +437,12 @@ Quit anyway?", $part->{device}, $part->{mntpoint})) or return if $::isStandalone sub copying_message { my ($o, $title, $message, $b_temp) = @_; - my $w = $o->wait_messageW($title, N("Copying in progress"), ugtk3::gtknew('VBox', padding => 5, children_tight => [ + my $dialogue = ugtk3::gtknew('VBox', padding => 5, children_centered => [ ugtk3::gtkcreate_img("MageiaLive-advert"), $message, - ])); + ]); + $dialogue->set_vexpand(1); + my $w = $o->wait_messageW($title, N("Copying in progress"), $dialogue); push @tempory::objects, $w if $b_temp; my $b = before_leaving { $o->wait_message_endW($w) }; |