diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-04-08 16:58:43 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-04-08 16:58:43 +0000 |
commit | e92750d42412811240e6e9bf9a82b965f5ef8bd4 (patch) | |
tree | 53438c40787be409db02d3c5b26e4f9233e42734 /perl-install/install_any.pm | |
parent | b435c66c44391acc220decf66ae57bb1086b9004 (diff) | |
download | drakx-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar drakx-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar.gz drakx-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar.bz2 drakx-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar.xz drakx-e92750d42412811240e6e9bf9a82b965f5ef8bd4.zip |
Supplementary cd-roms weren't marked as supplementary. Fix this.
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r-- | perl-install/install_any.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index cd7079970..f5b01e351 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -474,7 +474,12 @@ sub selectSupplMedia { useMedium($medium_name); #- probe for an hdlists file and then look for all hdlists listed herein - eval { pkgs::psUsingHdlists($o, $suppl_method, "/mnt/cdrom", $o->{packages}, $medium_name) }; + eval { + pkgs::psUsingHdlists($o, $suppl_method, "/mnt/cdrom", $o->{packages}, $medium_name, sub { + my ($supplmedium) = @_; + $supplmedium->{issuppl} = 1; + }); + }; log::l("psUsingHdlists failed: $@") if $@; #- copy latest compssUsers.pl and rpmsrate somewhere locally |