summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-11-02 16:49:55 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-11-02 16:49:55 +0000
commitb3369bf1b86ef6ccedd73cedf1f8f4c52a19caf4 (patch)
treecde1f086c3541dc37e0e09a096b01c9be3bea78e
parentbaabd04d3ba7a4f73bf297d01b7d0820a1f2bde9 (diff)
downloadurpmi-b3369bf1b86ef6ccedd73cedf1f8f4c52a19caf4.tar
urpmi-b3369bf1b86ef6ccedd73cedf1f8f4c52a19caf4.tar.gz
urpmi-b3369bf1b86ef6ccedd73cedf1f8f4c52a19caf4.tar.bz2
urpmi-b3369bf1b86ef6ccedd73cedf1f8f4c52a19caf4.tar.xz
urpmi-b3369bf1b86ef6ccedd73cedf1f8f4c52a19caf4.zip
Use MDV::Packdrakeng instead of deprecated wrapper
-rwxr-xr-xurpmq16
1 files changed, 9 insertions, 7 deletions
diff --git a/urpmq b/urpmq
index 77a5010e..a9f80bf7 100755
--- a/urpmq
+++ b/urpmq
@@ -316,14 +316,16 @@ if ($urpm::args::options{list_aliases}) {
@headers > 0 or next;
if (-s "$urpm->{statedir}/$urpm->{media}[$_]{hdlist}") {
- require packdrake;
- my $packer = new packdrake(
- $urpm->{media}[$_]{virtual}
+ require MDV::Packdrakeng;
+ my $packer = MDV::Packdrakeng->new(
+ archive => (
+ $urpm->{media}[$_]{virtual}
? ("$urpm->{media}[$_]{url}/$urpm->{media}[$_]{with_hdlist}" =~ m!^(?:file:/*)?(/[^/].*)!)[0]
: "$urpm->{statedir}/$urpm->{media}[$_]{hdlist}",
+ ),
quiet => 1,
);
- $packer->extract_archive(undef, @headers);
+ $packer->extract(undef, @headers);
} else {
#- fallback to retrieve rpm package before, so that --headers will be ok.
my %downloads = $urpm->download_source_packages({}, $list, force_local => 1);
@@ -353,9 +355,9 @@ if ($urpm::args::options{list_aliases}) {
? ("$urpm->{media}[$_]{url}/$urpm->{media}[$_]{with_hdlist}" =~ m!^(?:file:/*)?(/[^/].*)!)[0]
: "$urpm->{statedir}/$urpm->{media}[$_]{hdlist}";
if (-s $hdlist_path) {
- require packdrake;
- my $packer = new packdrake($hdlist_path, quiet => 1);
- $packer->extract_archive($tmp_header_dir, @headers);
+ require MDV::Packdrakeng;
+ my $packer = MDV::Packdrakeng->new(archive => $hdlist_path, quiet => 1);
+ $packer->extract($tmp_header_dir, @headers);
} elsif (!%downloads) {
#- fallback to retrieve rpm package before, so that --headers will be ok.
%downloads = $urpm->download_source_packages({}, $list, force_local => 1);