From 2ee78f3a9058098c7bdb9085bc5872662459755f Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 28 Aug 2001 20:42:12 +0000 Subject: propose to format / and /usr even if isFormatted. More generally do not trust isFormatted to show which partitions to format --- perl-install/install_steps.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 1d4430359..769ac6871 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -225,9 +225,11 @@ sub choosePartitionsToFormat($$) { $_->{mntpoint} or next; add2hash_($_, { toFormat => $_->{notFormatted} }); + $_->{toFormatUnsure} = member($_->{mntpoint}, '/', '/usr'); + if (!$_->{toFormat}) { my $t = fsedit::typeOfPart($_->{device}); - $_->{toFormatUnsure} = member($_->{mntpoint}, '/', '/usr') || + $_->{toFormatUnsure} ||= #- if detected dos/win, it's not precise enough to just compare the types (too many of them) (!$t || isOtherAvailableFS({ type => $t }) ? !isOtherAvailableFS($_) : $t != $_->{type}); } -- cgit v1.2.1