diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-08-10 05:09:27 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-08-10 05:09:27 +0000 |
| commit | 0e00d8fa29ab405b0339095fb3df3bf526ffb106 (patch) | |
| tree | e8b10467c8adbb223c41f8f3afe4d6c6f6ad6c68 /perl-install/install_any.pm | |
| parent | ac8319729327f501e39b40af655672e7d4e04b7e (diff) | |
| download | drakx-0e00d8fa29ab405b0339095fb3df3bf526ffb106.tar drakx-0e00d8fa29ab405b0339095fb3df3bf526ffb106.tar.gz drakx-0e00d8fa29ab405b0339095fb3df3bf526ffb106.tar.bz2 drakx-0e00d8fa29ab405b0339095fb3df3bf526ffb106.tar.xz drakx-0e00d8fa29ab405b0339095fb3df3bf526ffb106.zip | |
install_urpmi(): set up the right with_hdlist for urpmi.cfg
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 2ad6013c0..c472aa152 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -452,6 +452,7 @@ sub setPackages { $supplmedium->{prefix} = $url; #- for install_urpmi $supplmedium->{selected} = 1; $supplmedium->{method} = $suppl_method; + $supplmedium->{with_hdlist} = 'media_info/hdlist.cz'; #- for install_urpmi } else { log::l("no suppl hdlist"); } @@ -775,11 +776,13 @@ sub install_urpmi { $qname =~ s/(\s)/\\$1/g; $qdir =~ s/(\s)/\\$1/g; #- compute correctly reference to media/media_info - #- FIXME my $with; if ($_->{update}) { #- an update medium always use "../base/hdlist.cz"; + #- FIXME $with = "../base/hdlist.cz"; + } elsif ($_->{with_hdlist}) { + $with = $_->{with_hdlist}; } else { $with = $_->{rpmsdir}; $with =~ s|/[^/]*%{ARCH}.*||; |