summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/detect_devices.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 555a141e1..1b33a4604 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -11,6 +11,7 @@ use log;
use common;
use devices;
use run_program;
+use modules;
use c;
#-#####################################################################################
@@ -450,9 +451,7 @@ sub getSoundDevices() {
sub isTVcard { member($_[0]{driver}, qw(bttv cx8800 saa7134 usbvision)) }
-sub getTVcards() {
- grep { isTVcard($_) } detect_devices::probeall();
-}
+sub getTVcards() { modules::probe_category('multimedia/tv') }
sub getInputDevices() {
my (@devices, $device);