Hi folks,

last year (ok, it was the last day of last year...), I have started a thread 
about tv_grab_de_tvtoday and which grabbers are used by german freevo users. 
I've done some investigation and came to the following solution to grab data 
from tvtoday (and maybe other providers):

1. Install and configure tvm2vdr from here:
        http://steckrue.be/tvm2vdr/
        In the channels_wanted.pl, set "tvtoday" as provider I have not really 
tested 
other providers.

2. Apply the patch from the diff file attached to this mail.

3. Make sure that the line for Pro7 in channels.pl looks like this:
        @chan{"prosieben.de"}                = 
["S19.2E-1-1107-17501", "006" ,"22"  ,"Pro7" ,"40","pro7","","PRO7"];
(For 2. and 3., I've already contacted the developer of tvm2vdr in order to 
change it.)

4. Copy tvm2xml.pl (see attachment) to the tvm2vdr directory.
        (I have copied this program from here: http://mythtv.linux-dude.de/
        and changed it to be independent from myth and to create xmltv files 
which 
freevo understand.)

5. run tvm2xml.pl
        If everything was configured correctly, this should create a file named 
epg.data. Copy this file to the usual TV.xml...

I know that this is far from being "out of the box", but at least it works and 
it creates quite proper data.  

I am not really sure if this helps. If someone is interested, I could try to 
add what I've found out to the wiki...

Cheers,
        Thorsten




--- tvmovie2vdr-0.5.14_orig/inc/tvtodayfetch	2007-06-15 11:43:54.000000000 +0200
+++ tvmovie2vdr-0.5.14/inc/tvtodayfetch	2008-01-21 23:50:43.000000000 +0100
@@ -84,8 +84,11 @@
 		    $ustart = UnixDate("$today $start" ,"%s");
 		    $ustop = UnixDate("$today $stop" ,"%s");
 		    if ($ustop < $ustart) { # Event-ende ist am naechsten Tag ..
-		      $ustop += 24 * 60 * 60;  
-		      }
+		      $ustop += 24 * 60 * 60;
+		    }elsif($start < "05:00"){ # TvToday listet alles vor 5:00 Uhr am Tag vorher
+                      $ustart += 24 * 60 * 60;
+                      $ustop += 24 * 60 * 60;
+                    }
 
                     $flags .= "[Live]" if $detail =~ m|program/icon_live.gif|;
                     $flags .= "[Tipp]" if $detail =~ m|program/icon_tipp.gif|;

Attachment: tvm2xml.pl
Description: Perl program

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Freevo-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/freevo-users

Reply via email to