From 6de228ca09ca131223dc9c5c418b24bd5b2c8090 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Tue, 10 Aug 2004 08:56:49 +0000
Subject: URLPREFIX is not set if the main media isn't http, so the prefix must
 be passed manually.

---
 perl-install/pkgs.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 2fb31c834..d880912a0 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -416,7 +416,7 @@ sub psUsingHdlist {
     my $urpmidir = urpmidir($prefix);
     log::l("trying to read $hdlist for medium $medium_name");
 
-    #- if the medium already exist, use it.
+    #- if the medium already exists, use it.
     $packages->{mediums}{$medium_name} and return $packages->{mediums}{$medium_name};
 
     my $m = { hdlist     => $hdlist,
@@ -1118,7 +1118,7 @@ sub install($$$;$$) {
 						    #- supplementary CD already mounted in /mnt/cdrom
 						    $fd = install_any::getFile($f, $medium->{descr}, '/mnt/cdrom');
 						} else {
-						    $fd = install_any::getFile($f, $medium->{descr});
+						    $fd = install_any::getFile($f, $medium->{descr}, $medium->{prefix});
 						}
 						$fd ? fileno $fd : -1;
 					    }, callback_close => sub {
-- 
cgit v1.2.1