From e0b3337266c273ac85815c3b9feb574dbcd0d73d Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Thu, 5 Aug 2004 10:33:49 +0000
Subject: try to mount usbdevfs in $::prefix before attempting to run adsl
 start programs

---
 perl-install/network/adsl.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'perl-install/network')

diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm
index 49c33d707..98d6c7414 100644
--- a/perl-install/network/adsl.pm
+++ b/perl-install/network/adsl.pm
@@ -318,8 +318,12 @@ TYPE=$kind
     write_cnx_script($netc);
 
     unless ($::isStandalone) {
+        $::isInstall && eval {
+            require fs;
+            fs::mount("/proc/bus/usb", "$::prefix/proc/bus/usb", 'usbdevfs');
+        } or log::l("failed to mount usbdevfs");
         $modems{$adsl_device}{modules} && eval { modules::load(@{$modems{$adsl_device}{modules}}) }
-          or log::l("failled to load " . join('', @{$modems{$adsl_device}{modules}}), " modules: $@");
+          or log::l("failed to load " . join('', @{$modems{$adsl_device}{modules}}), " modules: $@");
         $modems{$adsl_device}{start} and run_program::rooted($::prefix, $modems{$adsl_device}{start});
     }
 }
-- 
cgit v1.2.1