xmltv/grab/zz_sdjson_sqlite tv_grab_zz_sdjson_sqlite, 1.3, 1.4

Gary Buhrmaster via xmltv-commit <[email protected]> Mon, 19 Jun 2017 16:15:30 +0000
Newsgroups gmane.comp.tv.xmltv.cvs
Message-ID <[email protected]>
Update of /cvsroot/xmltv/xmltv/grab/zz_sdjson_sqlite
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv23098/grab/zz_sdjson_sqlite

Modified Files:
	tv_grab_zz_sdjson_sqlite 
Log Message:
Sync grabber with upstream master


Index: tv_grab_zz_sdjson_sqlite
===================================================================
RCS file: /cvsroot/xmltv/xmltv/grab/zz_sdjson_sqlite/tv_grab_zz_sdjson_sqlite,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** tv_grab_zz_sdjson_sqlite	26 Sep 2016 15:39:19 -0000	1.3
--- tv_grab_zz_sdjson_sqlite	19 Jun 2017 16:15:28 -0000	1.4
***************
*** 3,7 ****
  # tv_grab_zz_sdjson_sqlite
  #
! # Copyright (c) 2016 Gary Buhrmaster <[email protected]>
  #
  # This code is distributed under the GNU General Public License v2 (GPLv2)
--- 3,7 ----
  # tv_grab_zz_sdjson_sqlite
  #
! # Copyright (c) 2016, 2017 Gary Buhrmaster <[email protected]>
  #
[...3030 lines suppressed...]
      my $responseContent = $response->decoded_content();
--- 7040,7044 ----
  
      print (STDERR "DEBUG:   HTTP response:\n" . Data::Dumper->new([$response])->Pad('DEBUG:   ')->Useqq(1)->Dump) if ($self->{'Debug'});
! 
      my $responseCode = $response->code();
      my $responseContent = $response->decoded_content();
***************
*** 6560,6564 ****
        {
          print (STDERR "DEBUG:   (re)using current token\n") if ($self->{'Debug'});
!         $return = $self->{'_Token'}; 
          print (STDERR "DEBUG: Returning from " . (caller(0))[3] . " with: \n" . Data::Dumper->new([$return])->Pad('DEBUG:   ')->Useqq(1)->Dump) if ($self->{'Debug'});
          return $return;
--- 7159,7163 ----
        {
          print (STDERR "DEBUG:   (re)using current token\n") if ($self->{'Debug'});
!         $return = $self->{'_Token'};
          print (STDERR "DEBUG: Returning from " . (caller(0))[3] . " with: \n" . Data::Dumper->new([$return])->Pad('DEBUG:   ')->Useqq(1)->Dump) if ($self->{'Debug'});
          return $return;


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