From 3eddf2583b774f928ece9212375b291c3878a478 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Fri, 16 Aug 2002 12:33:38 +0000
Subject: - harddrake::bttv is renamed harddrake::v4l - harddrake::v4l handle
 saa7134 too now (and not only bttv) - harddrake::v4l::config need a new
 driver parameter in order to be   able to offer the right cards and tuners
 list - drakxtv: kill some old comments - add the list of cards supported by
 saa7134 - add a not to remember a potentiel speedup

---
 perl-install/standalone/drakxtv | 31 +++++++++++++++----------------
 1 file changed, 15 insertions(+), 16 deletions(-)

(limited to 'perl-install/standalone/drakxtv')

diff --git a/perl-install/standalone/drakxtv b/perl-install/standalone/drakxtv
index 745860cca..be29f8966 100755
--- a/perl-install/standalone/drakxtv
+++ b/perl-install/standalone/drakxtv
@@ -18,12 +18,6 @@
 # along with this program; if not, write to the Free Software
 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
-# If we ever want to autoconf the tv card at install time, we should
-# make a package out of this.
-# Maybe we'll have to for harddrake2
-#
-#package tvdrake;
-
 use lib qw(/usr/lib/libDrakX);
 
 use standalone;     #- warning, standalone must be loaded very first, for 'explanations'
@@ -55,7 +49,7 @@ sub scan4channels {
 				  formatAlaTeX(_("XawTV isn't installed!
 
 
-If you do have a TV card but DrakX has neither detected it (no bttv
+If you do have a TV card but DrakX has neither detected it (no bttv nor saa7134
 module in \"/etc/modules\") nor installed xawtv, please send the
 results of \"lspcidrake -v -f\" to \"install\@mandrakesoft.com\"
 with subject \"undetected TV card\".
@@ -140,16 +134,21 @@ You can install it by typing \"urpmi xawtv\" as root, in a console.")));
     }
 }
 
-my @devices = detect_devices::probeall(1);
-if (grep { $_->{media_type} eq 'MULTIMEDIA_VIDEO' } @devices) {
-    if (($< == 0) && (grep { $_->{driver} eq 'bttv' } @devices)) {
-	   require harddrake::bttv;
-	   modules::read_conf;
-	   harddrake::bttv::config($in);
-	   modules::write_conf;
+my @devices = grep { $_->{media_type} eq 'MULTIMEDIA_VIDEO' } detect_devices::probeall(1);
+if (@devices) {
+    # TODO: That need some work for multiples TV cards
+    foreach (@devices) {
+	   if (($< == 0) && (grep { $_->{driver} =~ '(bttv|saa7134)' } @devices)) {
+		  require harddrake::v4l;
+		  require modules;
+		  no strict 'subs';
+		  modules::read_conf;
+		  harddrake::v4l::config($in, $_->{driver});
+		  modules::write_conf;
+	   }
+	   scan4channels();
+	   $in->exit(0);
     }
-    scan4channels();
-    $in->exit(0);
 } else {
     $in->ask_warn(_("No TV Card detected!"), formatAlaTeX(
 											   _("No TV Card has been detected on your machine. Please verify that a Linux-supported Video/TV Card is correctly plugged in.
-- 
cgit v1.2.1