From 234684d7e2fcca452ee5c0bedd0e82c15a3dc788 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 7 Jun 2000 18:20:40 +0000
Subject: *** empty log message ***

---
 perl-install/sbus_probing/main.pm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'perl-install/sbus_probing/main.pm')

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;
 
-- 
cgit v1.2.1