W w w datingchannel n f o

if (0) { $MYREPLAY_UNIT=$MYREPLAY_USER=$MYREPLAY_PASS=$MYREPLAY_NONG=$MYREPLAY_DEBUG=undef; ($MYREPLAY_UNIT,$MYREPLAY_USER,$MYREPLAY_PASS,$MYREPLAY_NONG,$MYREPLAY_DEBUG)=split(/,/,$_); *************** *** 317,321 **** --- 321,325 ---- Update of /cvsroot/xmltv/xmltv/lib In directory sc8-pr-cvs10.sourceforge.net:/tmp/cvs-serv16008/lib Modified Files: in Log Message: Documentation changes only.

If a file has been downloaded less than 23 hours ago, the file from the cache is used without contacting the server.

- - my $SHARE_DIR = undef; - $SHARE_DIR = $opt_share if defined $opt_share; - my $our_share_dir = (defined $SHARE_DIR) ? PL =================================================================== RCS file: /cvsroot/xmltv/xmltv/grab/it/tv_grab_it. PL,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** tv_grab_it. PL -0000 1.10 *************** *** 15,18 **** --- 15,20 ---- use strict; use File:: Copy qw/copy/; #here are the pods...

foreach (split( /\n/, $str )) - # Set the share directory using the undocumented --share option - sub set_share_dir( $$ ) - Grab_XML_uk_bleb-Update of /cvsroot/xmltv/xmltv/grab/huro In directory sc8-pr-cvs10.sourceforge.net:/tmp/cvs-serv3134/grab/huro Modified Files: tv_grab_huro. use XMLTV:: Capabilities qw/baseline manualconfig cache share/; use XMLTV:: Description ' Hungary/Romania'; use Getopt:: Long; use Date:: Manip; --- 123,129 ---- use strict; use XMLTV:: Version '$Id$'; !

next unless defined; my $where = "$CHANNEL_NAMES_FILE:$line_num"; --- 290,305 ---- # there are two fields: xmltv_id and site_id. This next line - # is altered by processing through tv_grab_ch_search. But we can - # use the current directory instead of share/tv_grab_ch_search for - # development. PL Log Message: Adds XMLTV:: Supplement support to tv_grab_uk_rt and removes share capability.

my $str = Get Supplement( "tv_grab_it", "channel_ids" ); my $CHANNEL_NAMES_FILE = "channel_ids"; my (%xmltv_chanid, %seen); my $line_num = 0; my $backend; ! - # - # The 'source' file tv_grab_ch_has $SHARE_DIR undef, which - # means use the current directory. foreach (XMLTV:: Config_file::read_lines($CHANNEL_NAMES_FILE, 1)) { $line_num; ! my $str = Get Supplement( 'tv_grab_ch_search', 'channel_ids' ); my (%chid_mapping, %seen); my $line_num = 0; ! Removes some minor debugging output for bad RT channels.

Please notify xmltv-users of any outstanding bad characters not being handled after this update. # a mixture of Latin-1 and UTF-8, I'm not sure exactly. # our output to be in Latin-1 but HTML:: Entities decides to use ! - # - # The 'source' file tv_grab_has $SHARE_DIR undef, which means - # use the current directory.

Index: tv_grab_uk_=================================================================== RCS file: /cvsroot/xmltv/xmltv/grab/uk_rt/tv_grab_uk_rt.in,v retrieving revision 1.111 retrieving revision 1.112 diff -C2 -d -r1.111 -r1.112 *** tv_grab_uk_ -0000 1.111 --- tv_grab_uk_ -0000 1.112 *************** *** 413,444 **** my $page = get_nice $uri; ! # Unicode so we have to fiddle a few entities manually first. # See for Latin-1 charmap # for ($page) foreach (split /\n/, $page) { *************** *** 511,514 **** --- 551,556 ---- # as a regular cast member, not the programme's director $cast =~ s/\s / /g; # first we check for 'character*actor' entries if ($cast =~ tr/*//) { *************** *** 559,562 **** --- 601,605 ---- for ($desc) { if (defined) --- 56,59 ---- *************** *** 137,142 **** my( $file ) = @_; ! In any case the directory can be - # overridden with the --share option (useful for testing).

Leave a Reply