diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-04-23 17:28:20 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-04-23 17:28:20 +0000 |
commit | c03d18c0b61015602f86bb735b0412bb44289bc8 (patch) | |
tree | 3323d88fdfdaaed6587284654307504c99a0e0bb /perl-install | |
parent | 23482f3c6be3d61b50198f203e73fea2cb485fa2 (diff) | |
download | drakx-backup-do-not-use-c03d18c0b61015602f86bb735b0412bb44289bc8.tar drakx-backup-do-not-use-c03d18c0b61015602f86bb735b0412bb44289bc8.tar.gz drakx-backup-do-not-use-c03d18c0b61015602f86bb735b0412bb44289bc8.tar.bz2 drakx-backup-do-not-use-c03d18c0b61015602f86bb735b0412bb44289bc8.tar.xz drakx-backup-do-not-use-c03d18c0b61015602f86bb735b0412bb44289bc8.zip |
(hdlist_on_disk) enhance it
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install/media.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm index 9548900c2..d821ab8e2 100644 --- a/perl-install/install/media.pm +++ b/perl-install/install/media.pm @@ -437,7 +437,9 @@ sub hdlist_on_disk { my ($m) = @_; #urpmidir() . "/hdlist.$m->{fakemedium}.cz"; - join('/', $m->{url}, $m->{media_info_dir}, "hdlist.cz"); + require urpm; + # FIXME: download hdlist if needed: + return urpm::is_local_medium($m) ? join('/', $m->{url}, $m->{media_info_dir}, "hdlist.cz") : ''; } sub _allow_copy_rpms_on_disk { |