From 9bf03d1088adcd4187b418af6dad4429a91f7e2f Mon Sep 17 00:00:00 2001 From: Adam Lebsack Date: Sat, 27 May 2000 23:40:06 +0000 Subject: see Changelog --- perl-install/fsedit.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/fsedit.pm') diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 30b605927..020a6f57c 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -107,7 +107,7 @@ sub get_fstab(@) { #- get normal partition that should be visible for working on. sub get_visible_fstab(@) { - grep { $_ && !partition_table::isWholedisk($_) } map { partition_table::get_normal_parts($_) } @_; + grep { $_ && !partition_table::isWholedisk($_) && !partition_table::isHiddenMacPart($_) } map { partition_table::get_normal_parts($_) } @_; } sub free_space(@) { @@ -438,7 +438,7 @@ sub verifyHds { } my @parts = readProcPartitions($hds); - $ok &&= @parts == listlength(get_fstab(@$hds)); + $ok &&= @parts == listlength(get_fstab(@$hds)) unless arch() eq "ppc"; if ($readonly && !$ok) { log::l("using /proc/partitions as diskdrake failed :("); -- cgit v1.2.1