summaryrefslogtreecommitdiffstats
path: root/perl-install/install/install2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2020-12-31 10:39:43 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2022-01-05 15:34:30 +0100
commit08b1d3996f89d923fc16dd7f60434d66955c162a (patch)
treefc6f7fc82f50be85b460a2d890be496c262eee9e /perl-install/install/install2.pm
parent96f3c6f4744186ab84044b52ba760ad80da987a4 (diff)
downloaddrakx-08b1d3996f89d923fc16dd7f60434d66955c162a.tar
drakx-08b1d3996f89d923fc16dd7f60434d66955c162a.tar.gz
drakx-08b1d3996f89d923fc16dd7f60434d66955c162a.tar.bz2
drakx-08b1d3996f89d923fc16dd7f60434d66955c162a.tar.xz
drakx-08b1d3996f89d923fc16dd7f60434d66955c162a.zip
perl_checker cleanups
Diffstat (limited to 'perl-install/install/install2.pm')
-rw-r--r--perl-install/install/install2.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/install2.pm b/perl-install/install/install2.pm
index 3fea4f0ce..de48a6dbb 100644
--- a/perl-install/install/install2.pm
+++ b/perl-install/install/install2.pm
@@ -400,7 +400,7 @@ sub init_local_install {
push @::auto_steps,
# 'selectLanguage', 'selectKeyboard', 'miscellaneous', 'selectInstallClass',
'doPartitionDisks', 'formatPartitions';
- eval { fs::mount::sys_kernel_debug(''); }; #- do it now so that when_load doesn't do it
+ eval { fs::mount::sys_kernel_debug('') }; #- do it now so that when_load doesn't do it
$o->{nomouseprobe} = 1;
$o->{mouse} = mouse::fullname2mouse('Universal|Any PS/2 & USB mice');
}
@@ -703,7 +703,7 @@ sub main {
$o->{stage2_phys_medium} = install::media::stage2_phys_medium($o->{method});
if (-e '/tmp/media/DATE.txt') {
- my @mount_entry = grep { $_ =~ m,/tmp/media, } cat_('/proc/mounts');
+ my @mount_entry = grep { m,/tmp/media, } cat_('/proc/mounts');
my @mount_fields = split(/ /, $mount_entry[0]);
log::l(run_program::get_stdout('blkid', '-s', 'LABEL', $mount_fields[0]));
log::l('ISO date: ' . cat_('/tmp/media/DATE.txt'));