diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-10-19 16:23:37 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-10-19 16:23:37 +0000 |
commit | 42e5f09e742d3e9538df00d697194f9f9c52c86b (patch) | |
tree | 598263d01fab5aeceac1b9d43f7bd77c0ed800e7 /perl-install/install_any.pm | |
parent | 7dd1f94c99a1f049023e60a012277b24ce7793f7 (diff) | |
download | drakx-42e5f09e742d3e9538df00d697194f9f9c52c86b.tar drakx-42e5f09e742d3e9538df00d697194f9f9c52c86b.tar.gz drakx-42e5f09e742d3e9538df00d697194f9f9c52c86b.tar.bz2 drakx-42e5f09e742d3e9538df00d697194f9f9c52c86b.tar.xz drakx-42e5f09e742d3e9538df00d697194f9f9c52c86b.zip |
Repair FTP supplementary media with overriding of rpmsrate and compssUsers.pl
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r-- | perl-install/install_any.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 33800b4b3..0b23d8a99 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -515,8 +515,13 @@ sub selectSupplMedia { log::l("psUsingHdlists failed: $@"); } else { #- copy latest compssUsers.pl and rpmsrate somewhere locally - getAndSaveFile("$url/media/media_info/compssUsers.pl", "/tmp/compssUsers.pl"); - getAndSaveFile("$url/media/media_info/rpmsrate", "/tmp/rpmsrate"); + if ($suppl_method eq 'ftp') { + getAndSaveFile("media/media_info/compssUsers.pl", "/tmp/compssUsers.pl"); + getAndSaveFile("media/media_info/rpmsrate", "/tmp/rpmsrate"); + } else { + getAndSaveFile("$url/media/media_info/compssUsers.pl", "/tmp/compssUsers.pl"); + getAndSaveFile("$url/media/media_info/rpmsrate", "/tmp/rpmsrate"); + } useMedium($prev_asked_medium); #- back to main medium return $suppl_method; } |