summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-11-06 18:04:39 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-11-06 18:04:39 +0000
commit07ef1cb49605b7d2df578a79f5eee812f87a7062 (patch)
treef9bd0409fa11aaa14627a413237d0696b8754be1 /perl-install/install2.pm
parent5a7014d19c1843b37e135e34ab3e973b706de07e (diff)
downloaddrakx-backup-do-not-use-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar
drakx-backup-do-not-use-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar.gz
drakx-backup-do-not-use-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar.bz2
drakx-backup-do-not-use-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar.xz
drakx-backup-do-not-use-07ef1cb49605b7d2df578a79f5eee812f87a7062.zip
make perl_checker happy
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index a699a5ebd..af3a40040 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -426,7 +426,7 @@ sub main {
$o->{method} ||= "cdrom";
$o->{mkbootdisk} = 0;
}
- unless ($::testing || $::live) {
+ if (!$::testing && !$::live) {
symlink "rhimage", "/tmp/image"; #- for compatibility with old stage1
unlink $_ foreach "/modules/modules.mar", "/sbin/stage1";
}
@@ -516,7 +516,7 @@ sub main {
} modules::probe_category('multimedia/sound');
#- needed very early for install_steps_gtk
- eval { $o->{mouse} = mouse::detect() } unless $o->{nomouseprobe} || $o->{mouse};
+ eval { $o->{mouse} = mouse::detect() } if !$o->{nomouseprobe} && !$o->{mouse};
$o->{lang} = lang::set($o->{lang}) if $o->{lang} ne 'en_US'; #- mainly for defcfg