xmltv/grab/fi/fi/source yle.pm,2.12,2.13

Update of /cvsroot/xmltv/xmltv/grab/fi/fi/source
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv15725/grab/fi/fi/source

Modified Files:
	yle.pm 
Log Message:
- yle: switch URLs from http:// to https://
- update tv_grab_fi dependencies to include LWP::Protocol::https


Index: yle.pm
===================================================================
RCS file: /cvsroot/xmltv/xmltv/grab/fi/fi/source/yle.pm,v
retrieving revision 2.12
retrieving revision 2.13
diff -C2 -d -r2.12 -r2.13
*** yle.pm	12 Jul 2017 19:33:02 -0000	2.12
--- yle.pm	7 Oct 2017 20:39:00 -0000	2.13
***************
*** 38,42 ****
  
      # Fetch & parse HTML (do not ignore HTML5 <time>)
!     my $root = fetchTree("http://$languages{$code}[0].yle.fi/tv/$languages{$code}[1]",
                           undef, undef, 1);
      if ($root) {
--- 38,42 ----
  
      # Fetch & parse HTML (do not ignore HTML5 <time>)
!     my $root = fetchTree("https://$languages{$code}[0].yle.fi/tv/$languages{$code}[1]",
                           undef, undef, 1);
      if ($root) {
***************
*** 93,97 ****
  
    # Fetch & parse HTML (do not ignore HTML5 <time>)
!   my $root = fetchTree("http://$languages{$code}[0].yle.fi/tv/$languages{$code}[1]?t=" . $today->ymdd(),
  		       undef, undef, 1);
    if ($root) {
--- 93,97 ----
  
    # Fetch & parse HTML (do not ignore HTML5 <time>)
!   my $root = fetchTree("https://$languages{$code}[0].yle.fi/tv/$languages{$code}[1]?t=" . $today->ymdd(),
  		       undef, undef, 1);
    if ($root) {


------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot