diff options
| -rw-r--r-- | perl-install/detect_devices.pm | 2 | ||||
| -rwxr-xr-x | perl-install/standalone/drakxtv | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 3e8836763..68dc485c2 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -449,7 +449,7 @@ sub getSoundDevices() { modules::probe_category('multimedia/sound'); } -sub isTVcard { member($_[0]{driver}, qw(bttv cx88 saa7134)) } +sub isTVcardConfigurable { member($_[0]{driver}, qw(bttv cx88 saa7134)) } sub getTVcards() { modules::probe_category('multimedia/tv') } diff --git a/perl-install/standalone/drakxtv b/perl-install/standalone/drakxtv index 83f175237..7b8e79838 100755 --- a/perl-install/standalone/drakxtv +++ b/perl-install/standalone/drakxtv @@ -115,7 +115,7 @@ sub scan4channels() { my @devices = detect_devices::getTVcards(); push @devices, { driver => 'bttv', description => 'dummy' } if $::testing && !@devices; -my ($devices, $devices_ok) = partition { detect_devices::isTVcard($_) } @devices; +my ($devices, $devices_ok) = partition { detect_devices::isTVcardConfigurable($_) } @devices; my $modules_conf; @@ -124,7 +124,7 @@ if (@devices = @$devices) { my $not_canceled = 1; # TODO: That need some work for multiples TV cards each_index { - if (($< == 0 || $::testing) && (grep { detect_devices::isTVcard($_) } @devices)) { + if (($< == 0 || $::testing) && (grep { detect_devices::isTVcardConfigurable($_) } @devices)) { require harddrake::v4l; require modules; |