From e9746d5b1868e7ecdbabce94c47325e05c2f666d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 18 Nov 2002 16:44:52 +0000
Subject: make perl_checker happy

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

(limited to 'perl-install/network/isdn.pm')

diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm
index e6997351e..a0f766333 100644
--- a/perl-install/network/isdn.pm
+++ b/perl-install/network/isdn.pm
@@ -257,7 +257,7 @@ sub isdn_detect {
 
 sub isdn_detect_backend {
     my ($isdn) = @_;
-    if (my ($c) = (modules::probe_category('network/isdn'))) {
+    if (my ($c) = modules::probe_category('network/isdn')) {
   	$isdn->{$_} = $c->{$_} foreach qw(description vendor id driver options firmware);
 	$isdn->{$_} = sprintf("%0x", $isdn->{$_}) foreach 'vendor', 'id';
 	$isdn->{card_type} = 'pci';
-- 
cgit v1.2.1