diff options
Diffstat (limited to 'perl-install/install/install2.pm')
| -rw-r--r-- | perl-install/install/install2.pm | 4 |
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')); |