summaryrefslogtreecommitdiffstats
path: root/perl-install/fs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-02-08 11:37:30 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-02-08 11:37:30 +0000
commit51637cc2e6a2e158f3ede301c8f16eb915515ab5 (patch)
treedbfcf3cf7215e001776e63a4f74af44c1e629c39 /perl-install/fs.pm
parent62aeac2fdc4433c91c68c342c72ea8659591c07d (diff)
downloaddrakx-51637cc2e6a2e158f3ede301c8f16eb915515ab5.tar
drakx-51637cc2e6a2e158f3ede301c8f16eb915515ab5.tar.gz
drakx-51637cc2e6a2e158f3ede301c8f16eb915515ab5.tar.bz2
drakx-51637cc2e6a2e158f3ede301c8f16eb915515ab5.tar.xz
drakx-51637cc2e6a2e158f3ede301c8f16eb915515ab5.zip
new kernel doesn't like usbdevfs any more, it wants usbfs
Diffstat (limited to 'perl-install/fs.pm')
-rw-r--r--perl-install/fs.pm9
1 files changed, 8 insertions, 1 deletions
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 8cdead039..3f4020946 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -487,7 +487,7 @@ sub mount {
$o_wait_message->(N("Mounting partition %s", $dev)) if $o_wait_message;
system('mount', '-t', $fs, $dev, $where, if_($o_options, '-o', $o_options)) == 0 or die N("mounting partition %s in directory %s failed", $dev, $where);
} else {
- my @types = ('ext2', 'proc', 'sysfs', 'usbdevfs', 'iso9660', 'devfs', 'devpts', @fs_modules);
+ my @types = ('ext2', 'proc', 'sysfs', 'usbfs', 'usbdevfs', 'iso9660', 'devfs', 'devpts', @fs_modules);
member($fs, @types) or log::l("skipping mounting $dev partition ($fs)"), return;
@@ -666,4 +666,11 @@ sub df {
$part->{free};
}
+sub mount_usbfs {
+ my ($prefix) = @_;
+
+ my $fs = cat_('/proc/filesystems') =~ /usbfs/ ? 'usbfs' : 'usbdevfs';
+ mount('none', "$prefix/proc/bus/usb", $fs);
+}
+
1;