summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-04-20 11:34:52 +0000
committerFrancois Pons <fpons@mandriva.com>2000-04-20 11:34:52 +0000
commit635c590d21ca7bf878aa1d3a60bce36020e79f94 (patch)
tree9e1ab9ac094f189a5fa389ed89d74a5c3f3230ad /perl-install/install_any.pm
parenta098b07c6f1e330df9e098cbea8237e1f9b4abd4 (diff)
downloaddrakx-635c590d21ca7bf878aa1d3a60bce36020e79f94.tar
drakx-635c590d21ca7bf878aa1d3a60bce36020e79f94.tar.gz
drakx-635c590d21ca7bf878aa1d3a60bce36020e79f94.tar.bz2
drakx-635c590d21ca7bf878aa1d3a60bce36020e79f94.tar.xz
drakx-635c590d21ca7bf878aa1d3a60bce36020e79f94.zip
*** empty log message ***
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 824465c9e..2799ff252 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -46,7 +46,7 @@ my $asked_medium = 1;
sub useMedium($) {
#- before ejecting the first CD, there are some files to copy!
#- does nothing if the function has already been called.
- $_[0] and $::o->{method} eq 'cdrom' and setup_postinstall_rpms($::o->{prefix}, $::o->{packages});
+ $_[0] > 1 and $::o->{method} eq 'cdrom' and setup_postinstall_rpms($::o->{prefix}, $::o->{packages});
$asked_medium eq $_[0] or log::l("selecting new medium '$_[0]'");
$asked_medium = $_[0];