From 22bc5fdf35750e4ba6eafb903029c41bf2dbdcb3 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 3 Jul 2001 14:21:39 +0000 Subject: (mount): fix fsck.ext2'ing --- perl-install/fs.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/fs.pm') diff --git a/perl-install/fs.pm b/perl-install/fs.pm index 1e73b5aad..3e9603c28 100644 --- a/perl-install/fs.pm +++ b/perl-install/fs.pm @@ -201,8 +201,6 @@ sub mount($$$;$) { # nfs::mount($dev, $where) or die _("nfs mount failed"); } elsif ($fs eq 'smb') { die "no smb yet..."; - } elsif ($fs eq 'ext2') { - run_program::run("fsck.ext2", $dev); } else { $dev = devices::make($dev) if $fs ne 'proc' && $fs ne 'usbdevfs'; @@ -228,6 +226,8 @@ sub mount($$$;$) { eval { modules::load('reiserfs') }; } elsif ($fs eq 'romfs') { eval { modules::load('romfs') }; + } elsif ($fs eq 'ext2') { + run_program::run("fsck.ext2", "-a", $dev) or die _("fsck failed: ") . "$!"; } $where =~ s|/$||; -- cgit v1.2.1