xmltv/grab/fi/fi/source yle.pm,2.07,2.08
Stefan Becker <[email protected]>
| Newsgroups | gmane.comp.tv.xmltv.cvs |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/xmltv/xmltv/grab/fi/fi/source
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv2450/grab/fi/fi/source
Modified Files:
yle.pm
Log Message:
- minor code style fixes
Index: yle.pm
===================================================================
RCS file: /cvsroot/xmltv/xmltv/grab/fi/fi/source/yle.pm,v
retrieving revision 2.07
retrieving revision 2.08
diff -C2 -d -r2.07 -r2.08
*** yle.pm 5 Dec 2014 18:58:49 -0000 2.07
--- yle.pm 22 Feb 2015 14:10:47 -0000 2.08
***************
*** 39,43 ****
# Fetch & parse HTML
! my $root = fetchTree("http://$languages{$code}.yle.fi/tv/opas", 'UTF-8');
if ($root) {
--- 39,43 ----
# Fetch & parse HTML
! my $root = fetchTree("http://$languages{$code}.yle.fi/tv/opas", "utf-8-strict");
if ($root) {
***************
*** 87,91 ****
# Fetch & parse HTML (do not ignore HTML5 <time>)
my $root = fetchTree("http://$languages{$code}.yle.fi/tv/opas?t=" . $today->ymdd(),
! 'UTF-8', undef, 1);
if ($root) {
my @objects;
--- 87,91 ----
# Fetch & parse HTML (do not ignore HTML5 <time>)
my $root = fetchTree("http://$languages{$code}.yle.fi/tv/opas?t=" . $today->ymdd(),
! "utf-8-strict", undef, 1);
if ($root) {
my @objects;
------------------------------------------------------------------------------
Download BIRT iHub F-Type - The Free Enterprise-Grade BIRT Server
from Actuate! Instantly Supercharge Your Business Reports and Dashboards
with Interactivity, Sharing, Native Excel Exports, App Integration & more
Get technology previously reserved for billion-dollar corporations, FREE
http://pubads.g.doubleclick.net/gampad/clk?id=190641631&iu=/4140/ostg.clktrk