From 524f6d5e74cb463add8ab32e9e3ff4f8ccabe609 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 28 Aug 2008 15:10:41 +0000 Subject: - create any::urpmi_add_all_media() out of finish_install's ask_urpmi() - make it installer compliant --- perl-install/standalone/finish-install | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install index bc54c552a..f2b8c058f 100755 --- a/perl-install/standalone/finish-install +++ b/perl-install/standalone/finish-install @@ -90,10 +90,8 @@ sub ask_network() { sub ask_urpmi() { #- configure urpmi media if network is up and no media are configured require network::tools; - return if !network::tools::has_network_connection(); run_program::get_stdout('urpmq', '--list-media') and return; - my $_wait = $in->wait_message(N("Please wait"), N("Please wait, adding media...")); - run_program::run('urpmi.addmedia', '--distrib', '--mirrorlist', '$MIRRORLIST'); + any::urpmi_add_all_media($in); } sub set_authentication { -- cgit v1.2.1