summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorMartin Whitaker <mageia@martin-whitaker.me.uk>2017-05-03 08:57:47 +0100
committerMartin Whitaker <mageia@martin-whitaker.me.uk>2017-05-06 15:10:55 +0100
commit094e04353f100996cf6da2238cccabf7a27c5992 (patch)
tree35ada30a5e6610b04d6401fd80cb6dde10e644d9 /perl-install
parentfec3227faa8605b86db734aa4826fdf07e5d2eec (diff)
downloaddrakx-094e04353f100996cf6da2238cccabf7a27c5992.tar
drakx-094e04353f100996cf6da2238cccabf7a27c5992.tar.gz
drakx-094e04353f100996cf6da2238cccabf7a27c5992.tar.bz2
drakx-094e04353f100996cf6da2238cccabf7a27c5992.tar.xz
drakx-094e04353f100996cf6da2238cccabf7a27c5992.zip
Add "please wait" message when running update-grub2.
This can take several minutes on systems with many O/S installations.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 025daecd2..281b61225 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -616,7 +616,11 @@ sub setupBootloader__grub2 {
# update entries (so that we can display their list below):
my $error;
+ # grub2-update can take many minutes on some systems (mga#18538)
+ # FIXME: change the message to be more informative
+ my $_w = $in->wait_message(N("Please wait"), N("Please wait"));
run_program::rooted($::prefix, 'update-grub2', '2>', \$error) or die "update-grub2 failed: $error";
+ undef $_w;
# read grub2 auto-generated entries (instead of keeping eg: grub/lilo ones):
my $b2 = bootloader::read_grub2();