summaryrefslogtreecommitdiffstats
path: root/perl-install/sbus_probing
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-06-07 18:20:40 +0000
committerFrancois Pons <fpons@mandriva.com>2000-06-07 18:20:40 +0000
commit234684d7e2fcca452ee5c0bedd0e82c15a3dc788 (patch)
tree60b1a1022a726c0af371559d4d40b2a062da8162 /perl-install/sbus_probing
parent0d81dab56418bb5bac57ae4f6b41d508da2180ec (diff)
downloaddrakx-234684d7e2fcca452ee5c0bedd0e82c15a3dc788.tar
drakx-234684d7e2fcca452ee5c0bedd0e82c15a3dc788.tar.gz
drakx-234684d7e2fcca452ee5c0bedd0e82c15a3dc788.tar.bz2
drakx-234684d7e2fcca452ee5c0bedd0e82c15a3dc788.tar.xz
drakx-234684d7e2fcca452ee5c0bedd0e82c15a3dc788.zip
*** empty log message ***
Diffstat (limited to 'perl-install/sbus_probing')
-rw-r--r--perl-install/sbus_probing/main.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/sbus_probing/main.pm b/perl-install/sbus_probing/main.pm
index e5c3f1596..b1fce96f7 100644
--- a/perl-install/sbus_probing/main.pm
+++ b/perl-install/sbus_probing/main.pm
@@ -2,6 +2,7 @@ package sbus_probing::main;
use c;
use log;
+use modules;
my %sbus_table_network = (
hme => [ "Sun Happy Meal Ethernet", "sunhme" ],
@@ -133,6 +134,7 @@ sub check {
sub probe($) {
my ($type) = @_;
+ eval { modules::load("openprom") };
my $root_node = c::prom_open();
my @l;
@@ -145,6 +147,7 @@ sub probe($) {
sub matching_desc($;$) {
my ($regexp) = @_;
+ eval { modules::load("openprom") };
my $root_node = c::prom_open();
my @l;