From 0b201e62a6ad8d5c87f72a2e5416d50ee51f5722 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Mon, 16 Apr 2012 21:34:40 +0000
Subject: (urpmidir) adapt it to urpmi API

was unused since switching to urpmi code in 2009, needed for next
commits
---
 perl-install/install/media.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/install/media.pm')

diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index 27b931266..9548900c2 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -436,7 +436,8 @@ sub urpmidir() {
 sub hdlist_on_disk {
     my ($m) = @_;
 
-    urpmidir() . "/hdlist.$m->{fakemedium}.cz";
+    #urpmidir() . "/hdlist.$m->{fakemedium}.cz";
+    join('/', $m->{url}, $m->{media_info_dir}, "hdlist.cz");
 }
 
 sub _allow_copy_rpms_on_disk {
-- 
cgit v1.2.1