summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-04-04 13:44:48 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-04-04 13:44:48 +0000
commit84c66b2c906ebc4289fb3858b3f0d22121361b38 (patch)
treead358ea1d7f6478b62743fb17afae83343fb3c53 /perl-install/install2.pm
parentd157c06993b22ebc4b82baa360ccc3816646089f (diff)
downloaddrakx-84c66b2c906ebc4289fb3858b3f0d22121361b38.tar
drakx-84c66b2c906ebc4289fb3858b3f0d22121361b38.tar.gz
drakx-84c66b2c906ebc4289fb3858b3f0d22121361b38.tar.bz2
drakx-84c66b2c906ebc4289fb3858b3f0d22121361b38.tar.xz
drakx-84c66b2c906ebc4289fb3858b3f0d22121361b38.zip
no_comment
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index f81b7ba8d..12fb6e877 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -545,6 +545,7 @@ sub main {
if ($::g_auto_install) {
(my $root = `/bin/pwd`) =~ s|(/[^/]*){5}$||;
symlinkf $root, "/tmp/rhimage" or die "unable to create link /tmp/rhimage";
+ $o->{method} ||= "cdrom";
}
unless ($::testing) {