summaryrefslogtreecommitdiffstats
path: root/perl-install/fs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-09-13 13:30:37 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-09-13 13:30:37 +0000
commit5ad0ed55d7a51db8301f44ed2bafdd48c0682e4c (patch)
treebd51eab841234881b3a8923aa21f63909dc0bb00 /perl-install/fs.pm
parentb95c12f4cff7dc36b247391348d2781e70fad29c (diff)
downloaddrakx-5ad0ed55d7a51db8301f44ed2bafdd48c0682e4c.tar
drakx-5ad0ed55d7a51db8301f44ed2bafdd48c0682e4c.tar.gz
drakx-5ad0ed55d7a51db8301f44ed2bafdd48c0682e4c.tar.bz2
drakx-5ad0ed55d7a51db8301f44ed2bafdd48c0682e4c.tar.xz
drakx-5ad0ed55d7a51db8301f44ed2bafdd48c0682e4c.zip
no_comment
Diffstat (limited to 'perl-install/fs.pm')
-rw-r--r--perl-install/fs.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 0c07c9994..5b5876415 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -8,12 +8,10 @@ use log;
use devices;
use partition_table qw(:types);
use run_program;
-use nfs;
use swap;
use detect_devices;
use commands;
use modules;
-use raid;
use fsedit;
use loopback;
@@ -136,7 +134,8 @@ sub real_format_part {
}
sub format_part {
my ($raid, $part, $prefix) = @_;
- if (raid::is($part)) {
+ if (isRAID($part)) {
+ require raid;
raid::format_part($raid, $part);
} elsif (isLoopback($part)) {
loopback::format_part($part, $prefix);
@@ -187,7 +186,7 @@ sub mount($$$;$) {
if ($fs eq 'nfs') {
log::l("calling nfs::mount($dev, $where)");
- nfs::mount($dev, $where) or die _("nfs mount failed");
+# nfs::mount($dev, $where) or die _("nfs mount failed");
} elsif ($fs eq 'smb') {
die "no smb yet...";
} else {