xmltv/grab/huro tv_grab_huro.in,1.50,1.51

Update of /cvsroot/xmltv/xmltv/grab/huro
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv7856

Modified Files:
	tv_grab_huro.in 
Log Message:
(major) unbreak after changes to source site (credit: Zoltán Karcagi)

Index: tv_grab_huro.in
===================================================================
RCS file: /cvsroot/xmltv/xmltv/grab/huro/tv_grab_huro.in,v
retrieving revision 1.50
retrieving revision 1.51
diff -C2 -d -r1.50 -r1.51
*** tv_grab_huro.in	19 May 2014 13:16:38 -0000	1.50
--- tv_grab_huro.in	19 Oct 2014 18:03:38 -0000	1.51
***************
*** 313,317 ****
  	my $basedateday = UnixDate(parse_date($basedate), '%e');
  	my $urlfmt = "http://www." . domain() .
! 		"/pls/tv/tv.channel?i_ch=$ch_port_id" .
  		"&i_date=%d&i_xday=".$days_to_request."&i_where=1";
  	my $url = "$urlfmt";
--- 313,317 ----
  	my $basedateday = UnixDate(parse_date($basedate), '%e');
  	my $urlfmt = "http://www." . domain() .
! 		"/pls/tv/oldtv.channel?i_ch=$ch_port_id" .
  		"&i_date=%d&i_xday=".$days_to_request."&i_where=1";
  	my $url = "$urlfmt";
***************
*** 720,724 ****
  
  	t "parse_short_desc: text: '$cont'";
!         $WORDS{$COUNTRY}->{episode}="zdontmatchz" unless exists $WORDS{$COUNTRY}->{episode};
  	# port.hu episode style with season   (# patch #80)
  	if (m/\s*([IVX]+\.\/[0-9]+)\. $WORDS{$COUNTRY}->{episode}/) { $episode = $1; }
--- 720,724 ----
  
  	t "parse_short_desc: text: '$cont'";
! 	$WORDS{$COUNTRY}->{episode}="zdontmatchz" unless exists $WORDS{$COUNTRY}->{episode};
  	# port.hu episode style with season   (# patch #80)
  	if (m/\s*([IVX]+\.\/[0-9]+)\. $WORDS{$COUNTRY}->{episode}/) { $episode = $1; }
***************
*** 795,799 ****
  	my $bar = new XMLTV::ProgressBar('getting list of channels', 1)
  		if not $opt_quiet;
! 	my $url="http://www.$d/pls/tv/tv.prog";
  
  	worker("base-downloading");
--- 795,799 ----
  	my $bar = new XMLTV::ProgressBar('getting list of channels', 1)
  		if not $opt_quiet;
! 	my $url="http://www.$d/pls/tv/oldtv.prog";
  
  	worker("base-downloading");
***************
*** 1380,1384 ****
  		# image url not valid, so we must get it from the programmes page. Ideally we would do that during the main grab but this is a Q&D fix
  		# and I don't want to change too much of this code
! 		my $url = "http://www." . domain() . "/pls/w/tv.channel?i_ch=".$channelid."&i_date=".UnixDate('today','%Y-%m-%d')."&i_where=1";
  			
  		my $data=get_nice($url);
--- 1380,1384 ----
  		# image url not valid, so we must get it from the programmes page. Ideally we would do that during the main grab but this is a Q&D fix
  		# and I don't want to change too much of this code
! 		my $url = "http://www." . domain() . "/pls/w/oldtv.channel?i_ch=".$channelid."&i_date=".UnixDate('today','%Y-%m-%d')."&i_where=1";
  			
  		my $data=get_nice($url);
***************
*** 1470,1474 ****
  	# two sprintf parameters: first: channel_id,, second how many days grabbed
  	my $churlfmt = "http://www." . domain() .
! 		"/pls/tv/tv.channel?i_ch=%d&" .
  		"i_days=1&i_xday=%d&i_where=1";
  
--- 1470,1474 ----
  	# two sprintf parameters: first: channel_id,, second how many days grabbed
  	my $churlfmt = "http://www." . domain() .
! 		"/pls/tv/oldtv.channel?i_ch=%d&" .
  		"i_days=1&i_xday=%d&i_where=1";

------------------------------------------------------------------------------
Comprehensive Server Monitoring with Site24x7.
Monitor 10 servers for $9/Month.
Get alerted through email, SMS, voice calls or mobile push notifications.
Take corrective actions from your mobile device.
http://p.sf.net/sfu/Zoho

_______________________________________________
xmltv-commit mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xmltv-commit