From 81d899420d0b2357de761abba1547dbdec230a5b Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 22 Mar 2004 09:19:45 +0000 Subject: (isTVcard) typo fix --- perl-install/detect_devices.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 43b75cded..3629a9cf0 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -371,7 +371,7 @@ sub getSoundDevices() { (arch() =~ /ppc/ ? \&modules::load_category : \&modules::probe_category)->('multimedia/sound'); } -sub isTVcard { member($_[0]{driver} qw(bttv cx8800 saa7134 usbvision) } +sub isTVcard { member($_[0]{driver}, qw(bttv cx8800 saa7134 usbvision)) } sub getTVcards() { grep { isTVcard($_) } detect_devices::probeall(); -- cgit v1.2.1