From 4fab15178f09d688674048ebb7cd8fa8fec3b345 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 11 Mar 2005 10:47:42 +0000 Subject: use full path to rpms for ISO media --- perl-install/install_any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index e1d9a8e66..247f89aa8 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -961,7 +961,7 @@ sub install_urpmi { my ($iso_path) = $iso_info->{file} =~ m,^/tmp/hdimage/+(.*), or log::l("unable to find ISO image file name ($iso_info->{file}), not adding urpmi media"), next; my $dest = "/mnt/inst_iso"; - $dir = "removable:/$dest"; + $dir = "removable:/$dest/$_->{rpmsdir}"; -d "$::prefix/$dest" or mkdir_p($dest); $removable_device = "$p->{mntpoint}/$iso_path"; } elsif ($curmethod eq 'cdrom') { -- cgit v1.2.1