summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2022-01-16 23:20:41 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2022-01-16 23:23:08 +0100
commitdf5dce945bb3bf66f9f459c279701580d2f83f85 (patch)
tree3688abc9d3a0e169e1b2dea8bc21371ce096e113 /perl-install
parentdb5ce5916a9c715088d82c72825d08fc3e32cd67 (diff)
downloaddrakx-df5dce945bb3bf66f9f459c279701580d2f83f85.tar
drakx-df5dce945bb3bf66f9f459c279701580d2f83f85.tar.gz
drakx-df5dce945bb3bf66f9f459c279701580d2f83f85.tar.bz2
drakx-df5dce945bb3bf66f9f459c279701580d2f83f85.tar.xz
drakx-df5dce945bb3bf66f9f459c279701580d2f83f85.zip
perl_checker: fix undefined @fstab variable
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/steps.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm
index f19b8acc2..0319a6575 100644
--- a/perl-install/install/steps.pm
+++ b/perl-install/install/steps.pm
@@ -203,7 +203,7 @@ sub doPartitionDisksAfter {
#- We skipped the setupSCSI step, so $o->{fstab} will be empty. We need to
#- add a fake entry, to satisfy the following check for a root partition.
my $fstab = [ fs::read_fstab('', '/proc/mounts') ];
- my $part = fs::get::mntpoint2part($::prefix, $fstab) || $fstab[0];
+ my $part = fs::get::mntpoint2part($::prefix, $fstab) || $fstab->[0];
$part->{mntpoint} = '/';
$part->{isMounted} = 1;
$o->{fstab} = [ $part ];