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 | |
| parent | b435c66c44391acc220decf66ae57bb1086b9004 (diff) | |
| download | drakx-backup-do-not-use-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar drakx-backup-do-not-use-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar.gz drakx-backup-do-not-use-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar.bz2 drakx-backup-do-not-use-e92750d42412811240e6e9bf9a82b965f5ef8bd4.tar.xz drakx-backup-do-not-use-e92750d42412811240e6e9bf9a82b965f5ef8bd4.zip | |
Supplementary cd-roms weren't marked as supplementary. Fix this.
| -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 |