From cf9d480e25a0901956bf1385a31ec4d249bf503c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 13 May 2003 18:51:35 +0000
Subject: help perl_checker by providing an empty prototype

---
 perl-install/standalone/drakxtv | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/standalone')

diff --git a/perl-install/standalone/drakxtv b/perl-install/standalone/drakxtv
index 4c258dbf9..ce9908811 100755
--- a/perl-install/standalone/drakxtv
+++ b/perl-install/standalone/drakxtv
@@ -31,7 +31,7 @@ use common;
 
 my $in = 'interactive'->vnew;
 
-sub scan4channels {
+sub scan4channels() {
     # xawtv has been installed by DrakX when/if it's detected a tv
     # card.
 
@@ -129,7 +129,7 @@ You can install it by typing \"urpmi xawtv\" as root, in a console.")));
 }
 
 my @devices = grep { $_->{media_type} eq 'MULTIMEDIA_VIDEO' || $_->{driver} eq 'usbvision' } detect_devices::probeall(1);
-push @devices, { driver => 'bttv', description => 'dummy' } if $::testing && !@devices;
+push @devices, { driver => 'bttv', description => 'dummy' } if $::testingv && !@devices;
 if (@devices) {
     # TODO: That need some work for multiples TV cards
     foreach (@devices) {
-- 
cgit v1.2.1