From 41e437726fab54cc7281426e745644177a9909af Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 8 Sep 2001 23:30:33 +0000 Subject: make loopback installs work again --- perl-install/fsedit.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fsedit.pm') diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 2c4cd0e66..2846021da 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -80,7 +80,7 @@ sub empty_all_hds { sub recompute_loopbacks { my ($all_hds) = @_; my @fstab = get_all_fstab($all_hds); - $all_hds->{loopbacks} = [ map { isPartOfLoopback($_) ? @{$_->{loopback}} : () } @fstab ]; + @{$all_hds->{loopbacks}} = map { isPartOfLoopback($_) ? @{$_->{loopback}} : () } @fstab; } sub hds { -- cgit v1.2.1