xmltv/grab/it tv_grab_it.PL,1.19,1.20

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

Modified Files:
	tv_grab_it.PL 
Log Message:
Allow building on Perl versions 5.24.1+

Perl versions 5.24.1+ no longer include '.' in @INC. However, we need
access to some libraries included in the XMLTV source at build time so
"use lib '.'" for these specific instances.


Index: tv_grab_it.PL
===================================================================
RCS file: /cvsroot/xmltv/xmltv/grab/it/tv_grab_it.PL,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -d -r1.19 -r1.20
*** tv_grab_it.PL	2 Jun 2016 21:46:15 -0000	1.19
--- tv_grab_it.PL	24 Feb 2017 22:35:58 -0000	1.20
***************
*** 355,359 ****
--- 355,363 ----
  # stuff for setting share dir
  die "usage: $_ output_file share_dir" if @ARGV != 2;
+ 
+ # Perl 5.24.1+ does not include '.' in @INC but we need some libs during build
+ use lib '.';
  require 'lib/set_share_dir.pl';
+ 
  #warn "faccio $ARGV[0] $ARGV[1]\n";
  #set_share_dir('grab/it/tv_grab_it.in2', $ARGV[0], $ARGV[1]);


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