summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/media.pm9
1 files changed, 6 insertions, 3 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index aa0b1cd23..a319db962 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -628,7 +628,13 @@ sub get_media_cfg {
log::l("get_media_cfg read " . int(@{$packages->{depslist}}) . " headers");
+ _get_compsUsers_pl($phys_medium, $force_rpmsrate);
+ $suppl_CDs, $o->{copy_rpms_on_disk};
+}
+
+sub _get_compsUsers_pl {
+ my ($phys_medium, $force_rpmsrate) = @_;
#- copy latest compssUsers.pl and rpmsrate somewhere locally
if ($force_rpmsrate || ! -e '/tmp/rpmsrate') {
getAndSaveFile_($phys_medium, "media_info/rpmsrate", "/tmp/rpmsrate");
@@ -636,9 +642,6 @@ sub get_media_cfg {
if ($force_rpmsrate || ! -e '/tmp/compssUsers.pl') {
getAndSaveFile_($phys_medium, "media_info/compssUsers.pl", "/tmp/compssUsers.pl");
}
-
-
- $suppl_CDs, $o->{copy_rpms_on_disk};
}
sub get_standalone_medium {