summaryrefslogtreecommitdiffstats
path: root/perl-install/crypto.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-07-10 16:25:10 +0000
committerFrancois Pons <fpons@mandriva.com>2002-07-10 16:25:10 +0000
commit1a649e4bd1f0a76ec28fcb851b2f8fe2d6d967e1 (patch)
tree73c2e8ca7870ef0bb99753a2b1cdf8b16eb7e211 /perl-install/crypto.pm
parent52372f1853308aa90b76d4b5cd880c595433fc1d (diff)
downloaddrakx-1a649e4bd1f0a76ec28fcb851b2f8fe2d6d967e1.tar
drakx-1a649e4bd1f0a76ec28fcb851b2f8fe2d6d967e1.tar.gz
drakx-1a649e4bd1f0a76ec28fcb851b2f8fe2d6d967e1.tar.bz2
drakx-1a649e4bd1f0a76ec28fcb851b2f8fe2d6d967e1.tar.xz
drakx-1a649e4bd1f0a76ec28fcb851b2f8fe2d6d967e1.zip
use perl-URPM instead of rpmtools.
Diffstat (limited to 'perl-install/crypto.pm')
-rw-r--r--perl-install/crypto.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/crypto.pm b/perl-install/crypto.pm
index 6a33baff2..d4aabda4e 100644
--- a/perl-install/crypto.pm
+++ b/perl-install/crypto.pm
@@ -108,7 +108,7 @@ sub bestMirror {
sub version {
require pkgs;
my $pkg = pkgs::packageByName($::o->{packages}, 'mandrake-release');
- $pkg && pkgs::packageVersion($pkg) || '8.2'; #- safe but dangerous ;-)
+ $pkg && $pkg->version || '8.2'; #- safe but dangerous ;-)
}
sub dir { $mirrors{$_[0]}[1] . '/' . version() }
@@ -128,8 +128,6 @@ sub getFile {
$$retr ||= $ftp->retr($file);
}
-sub getDepslist { getFile("depslist-crypto", $_[0]) or die "unable to get depslist-crypto" }
-
sub getPackages {
my ($prefix, $packages, $mirror) = @_;