diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-25 13:42:12 +0200 |
---|---|---|
committer | Anne Nicolas <ennael@mageia.org> | 2015-05-25 13:42:12 +0200 |
commit | af6fca4f534629de9371ea6a29843505050b3374 (patch) | |
tree | d0ed295bcb159d467b70681e417ff9373a1658b9 /perl-install | |
parent | f5dfbc489a7607aee9b7687ca6fe1a0b7792d78a (diff) | |
download | drakx-af6fca4f534629de9371ea6a29843505050b3374.tar drakx-af6fca4f534629de9371ea6a29843505050b3374.tar.gz drakx-af6fca4f534629de9371ea6a29843505050b3374.tar.bz2 drakx-af6fca4f534629de9371ea6a29843505050b3374.tar.xz drakx-af6fca4f534629de9371ea6a29843505050b3374.zip |
die is not an option here (mga#8819)
just log the faillure and offer to either retry or abort
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install/steps_interactive.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index 5e0c2b9b6..3c2b2f591 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -749,6 +749,7 @@ Do you want to setup the update media?")), return; }; + try_again: #- bring all interface up for installing updates packages. install::interactive::upNetwork($o); @@ -757,7 +758,12 @@ Do you want to setup the update media?")), log::l("installUpdates: successfully added media"); } else { log::l("installUpdates: failed to add media"); - die "failed to add media" + if ($o->ask_okcancel(N("Warning"), + N("Failure when adding medium") . "\n" . N("Retry?"))) { + goto try_again; + } else { + return 0; + } } $o->ask_yesorno_({ title => N("Updates"), messages => formatAlaTeX( |