[vdr] PATCH: vdradmin-0.24-pre6 and autopid

[Andreas Kool <akool@akool.de>]

Hi Tom,

the following patch enables vdradmin-0.24-pre6 to be used with
vdr-1.1.29-autopid-2

---8<-----if--you--cut--here--you--will--probably--destroy--your--monitor---
--- vdradmind.pl.orig	2003-04-30 14:34:54.000000000 +0200
+++ vdradmind.pl	2003-05-03 14:46:48.000000000 +0200
@@ -377,7 +377,7 @@
     chomp;
     my($vdr_id, $temp) = split(/ /, $_, 2);
     my($name, $frequency, $polarization, $source, $symbolrate, $vpid, $apid,
-      $tpid, $ca, $service_id) = split(/\:/, $temp);
+      $tpid, $ca, $service_id, $nid, $tid) = split(/\:/, $temp);
     push(@CHAN, {
       vdr_id       => $vdr_id,
       name         => $name,
@@ -389,7 +389,9 @@
       apid         => $apid,
       tpid         => $tpid,
       ca           => $ca,
-      service_id   => $service_id
+      service_id   => $service_id,
+      nid	   => $nid,
+      tid	   => $tid
     });
   }
 }
@@ -402,9 +404,9 @@
 				return($channel->{vdr_id});
 			}
 		}
-	} elsif($channel_id =~ /^(.*)-.*-(.*)-(.*)$/) {
+	} elsif($channel_id =~ /^(.*)-(.*)-(.*)-(.*)$/) {
 		for my $channel (@CHAN) {
-			if($channel->{source} eq $1 && $channel->{frequency} == $2 && $channel->{service_id} == $3) {
+			if($channel->{source} eq $1 && $channel->{nid} == $2 && $channel->{tid} == $3 && $channel->{service_id} == $4) {
 				return($channel->{vdr_id});
 			}
 		}
---8<-----if--you--cut--here--you--will--probably--destroy--your--monitor---

Ciao,
Andreas
--
Andreas Kool (akool@akool.de * akool@isdn4linux.de * http://www.akool.de)
PGP: 3FBF2411 Fingerprint: B5 35 34 74 25 60 2A 7A  89 06 92 C4 08 BA A5 BD
(To get my PGP key, send me a mail with subject "send pgp key")
		X <-- Nail here for a new Monitor
Transmission of this message via the Microsoft Network is prohibited


-- 
Info:
To unsubscribe send a mail to ecartis@linuxtv.org with "unsubscribe vdr" as subject.