From 9d42e52fa720c98850b2c6c58db7b3fe1b17e6dc Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 5 May 2000 10:39:25 +0000 Subject: no_comment --- 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 844762905..c0b5b4fa9 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -185,7 +185,7 @@ sub suggest_part($$$;$) { grep { $_->{size} <= ($part->{maxsize} || $part->{size}) } grep { !has_mntpoint($_->{mntpoint}, $hds) || isSwap($_) && !$has_swap } grep { !$_->{hd} || $_->{hd} eq $hd->{device} } - grep { !$part->{type} || $part->{type} == $_->{type} || isTrueFS($part->{type}) && isTrueFS($_->{type}) } + grep { !$part->{type} || $part->{type} == $_->{type} || isTrueFS($part) && isTrueFS($_) } @$suggestions or return; #- if (arch() =~ /^i386/) { -- cgit v1.2.1