From 870d622c6e3ed5d9a81c84e3f3d0fc287733472f Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 9 Oct 1999 12:46:28 +0000 Subject: no_comment --- perl-install/install_steps.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 464e564ef..353a0e1a1 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -121,7 +121,7 @@ sub ask_mntpoint_s { $m{$m} = 1; #- in case the type does not correspond, force it to ext2 - $_->{type} = 0x83 if $m =~ m|^/| && !isDos($_) && !isWin($_) + $_->{type} = 0x83 if $m =~ m|^/| && !isFat($_); } } @@ -143,7 +143,7 @@ sub choosePartitionsToFormat($$) { my $t = fsedit::typeOfPart($_->{device}); $_->{toFormatUnsure} = #- if detected dos/win, it's not precise enough to just compare the types (too many of them) - isDos({ type => $t }) || isWin({type => $t}) ? !isDos($_) && !isWin($_) : $t != $_->{type}; + isFat({ type => $t }) ? !isFat($_) : $t != $_->{type}; } } } -- cgit v1.2.1