diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-08-28 15:50:11 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-08-28 15:50:11 +0000 |
commit | 8957c99c34027237f2a0eb4ba564dc093148f50a (patch) | |
tree | 7543dc627d6b005d8629d446b925cba15ed546d8 /perl-install | |
parent | 4c17ae5cc3872a6638b4e22d1bf0f12f50972547 (diff) | |
download | drakx-8957c99c34027237f2a0eb4ba564dc093148f50a.tar drakx-8957c99c34027237f2a0eb4ba564dc093148f50a.tar.gz drakx-8957c99c34027237f2a0eb4ba564dc093148f50a.tar.bz2 drakx-8957c99c34027237f2a0eb4ba564dc093148f50a.tar.xz drakx-8957c99c34027237f2a0eb4ba564dc093148f50a.zip |
add optional paramater to urpmi_add_all_media() to allow to add only update media
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/any.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 1645ed201..0fde2512c 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -838,13 +838,15 @@ sub sessions_with_order() { } sub urpmi_add_all_media { - my ($in) = @_; + my ($in, $b_update) = @_; #- configure urpmi media if network is up require network::tools; return if !network::tools::has_network_connection(); my $_wait = $in->wait_message(N("Please wait"), N("Please wait, adding media...")); - run_program::rooted($::prefix, 'urpmi.addmedia', '--distrib', '--mirrorlist', '$MIRRORLIST'); + run_program::rooted($::prefix, 'urpmi.addmedia', + if_($b_update, '--update'), + '--distrib', '--mirrorlist', '$MIRRORLIST'); } sub autologin { |