From 75f1a4936bcae5885c98c28c569985d29b1e9bb6 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 19 Jun 2002 16:41:27 +0000 Subject: mounting of ntfs after install really mount the partition (thanks to Buchan Milne) --- perl-install/fs.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fs.pm') diff --git a/perl-install/fs.pm b/perl-install/fs.pm index d7588ad97..53c729aa3 100644 --- a/perl-install/fs.pm +++ b/perl-install/fs.pm @@ -616,7 +616,7 @@ sub mount { my @fs_modules = qw(vfat hfs romfs ufs reiserfs xfs jfs ext3); - if (member($fs, 'smb', 'smbfs', 'nfs') && $::isStandalone) { + if (member($fs, 'smb', 'smbfs', 'nfs', 'ntfs') && $::isStandalone) { system('mount', '-t', $fs, $dev, $where, '-o', $options) == 0 or die _("mounting partition %s in directory %s failed", $dev, $where); return; #- do not update mtab, already done by mount(8) } elsif (member($fs, 'ext2', 'proc', 'usbdevfs', 'iso9660', @fs_modules)) { -- cgit v1.2.1