diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-06 18:04:39 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-06 18:04:39 +0000 |
commit | 07ef1cb49605b7d2df578a79f5eee812f87a7062 (patch) | |
tree | f9bd0409fa11aaa14627a413237d0696b8754be1 /perl-install/install2.pm | |
parent | 5a7014d19c1843b37e135e34ab3e973b706de07e (diff) | |
download | drakx-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar drakx-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar.gz drakx-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar.bz2 drakx-07ef1cb49605b7d2df578a79f5eee812f87a7062.tar.xz drakx-07ef1cb49605b7d2df578a79f5eee812f87a7062.zip |
make perl_checker happy
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r-- | perl-install/install2.pm | 4 |
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 |