From ab18e550dddce9519cc42bfa1c3353066fc7b7f4 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 28 Jun 2002 12:35:43 +0000 Subject: 3.6-4mdk --- urpmi.addmedia | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'urpmi.addmedia') diff --git a/urpmi.addmedia b/urpmi.addmedia index 74c0019e..3ef542e9 100755 --- a/urpmi.addmedia +++ b/urpmi.addmedia @@ -51,8 +51,11 @@ and [options] are from /^--?c/ and $options{noclean} = 0, next; /^--?h/ and $options{probe_with_hdlist} = 1, next; /^--?f/ and ++$options{force}, next; - /^--wget/ and $urpm->{sync} = \&urpm::sync_wget, next; - /^--curl/ and $urpm->{sync} = \&urpm::sync_curl, next; + /^--wget/ and $urpm->{sync} = sub { my $options = shift @_; + if (ref $options) { $options->{prefer} = 'wget' } + else { $options = { dir => $options, prefer => 'wget' } } + urpm::sync_webfetch($options, @_) }, next; + /^--curl/ and $urpm->{sync} = \&urpm::sync_webfetch, next; /^--distrib$/ and $options{distrib} = 1, next; /^--update$/ and $options{update} = 1, next; /^-/ and die $usage . _("\nunknown options '%s'\n", $_); -- cgit v1.2.1