summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-02-27 17:34:21 +0000
committerFrancois Pons <fpons@mandriva.com>2003-02-27 17:34:21 +0000
commitbbbe9e39d919e9f0799a451f71ac96d5681e4aec (patch)
tree4476d4ebd7ae90a38e86b0ea6a8252823b2b277f /perl-install
parent6acd785c65aba17fba1b2f386b2ff0236c1ffa2c (diff)
downloaddrakx-backup-do-not-use-bbbe9e39d919e9f0799a451f71ac96d5681e4aec.tar
drakx-backup-do-not-use-bbbe9e39d919e9f0799a451f71ac96d5681e4aec.tar.gz
drakx-backup-do-not-use-bbbe9e39d919e9f0799a451f71ac96d5681e4aec.tar.bz2
drakx-backup-do-not-use-bbbe9e39d919e9f0799a451f71ac96d5681e4aec.tar.xz
drakx-backup-do-not-use-bbbe9e39d919e9f0799a451f71ac96d5681e4aec.zip
added message box in case of error.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 564fa9001..d0dfcee81 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -780,7 +780,7 @@ Do you want to install the updates ?")),
$update_medium = crypto::getPackages($o->{prefix}, $o->{packages}, $u->{mirror});
}
};
- } while $@ || !$update_medium;
+ } while $@ || !$update_medium && $o->ask_warn('', N("Unable to contact mirror %s" . ($@ ? " :\n$@" : "")));
if ($update_medium) {
if ($o->choosePackagesTree($o->{packages}, $update_medium)) {