From 73c851144720e28b21a491b6250385170db9d752 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 24 Apr 2003 19:00:12 +0000
Subject: perl_checker adaptations + fixes

---
 perl-install/sbus_probing/main.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/sbus_probing')

diff --git a/perl-install/sbus_probing/main.pm b/perl-install/sbus_probing/main.pm
index 96d50663b..1bd20fe30 100644
--- a/perl-install/sbus_probing/main.pm
+++ b/perl-install/sbus_probing/main.pm
@@ -127,7 +127,7 @@ sub prom_walk {
     $nextnode = c::prom_getsibling($node) and prom_walk($sbus_probed, $nextnode, $sbus, $ebus);
 }
 
-sub probe {
+sub probe() {
     eval { modules::load("openprom") } if arch() =~ /sparc/;
     my $root_node = c::prom_open() or return;
     my @l;
-- 
cgit v1.2.1