From 5ad0ed55d7a51db8301f44ed2bafdd48c0682e4c Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 13 Sep 2000 13:30:37 +0000
Subject: no_comment

---
 perl-install/fsedit.pm | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

(limited to 'perl-install/fsedit.pm')

diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index a868493f4..72a96cfd9 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -14,9 +14,8 @@ use Data::Dumper;
 use fsedit;
 use devices;
 use loopback;
-use raid;
-use fs;
 use log;
+use fs;
 
 #-#####################################################################################
 #- Globals
@@ -110,12 +109,6 @@ sub free_space {
     sum map { $_->{size} } map { partition_table::get_holes($_) } @_;
 }
 
-sub hasRAID {
-    my $b = 0;
-    map { $b ||= isRAID($_) } get_fstab(@_);
-    $b;
-}
-
 sub is_one_big_fat {
     my ($hds) = @_;
     @$hds == 1 or return;
@@ -261,7 +254,7 @@ sub check_mntpoint {
     };
     $check->($fake_part) unless $mntpoint eq '/' && $loopbackDevice; #- '/' is a special case, no loop check
 
-    die "raid / with no /boot" if $mntpoint eq "/" && raid::is($part) && !has_mntpoint("/boot", $hds);
+    die "raid / with no /boot" if $mntpoint eq "/" && isMDRAID($part) && !has_mntpoint("/boot", $hds);
     die _("You need a true filesystem (ext2, reiserfs) for this mount point\n") if !isTrueFS($part) && member($mntpoint, qw(/ /usr));
 #-    if ($part->{start} + $part->{size} > 1024 * $hd->cylinder_size() && arch() =~ /i386/) {
 #-	  die "/boot ending on cylinder > 1024" if $mntpoint eq "/boot";
-- 
cgit v1.2.1