xmltv/grab/zz_sdjson tv_grab_zz_sdjson,NONE,1.1

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

Added Files:
	tv_grab_zz_sdjson 
Log Message:
forgot to add renamed tv_grab_zz_sdjson grabber

--- NEW FILE: tv_grab_zz_sdjson ---
#!/usr/bin/perl -w

my $grabber_cvs_id = '$Id: tv_grab_zz_sdjson,v 1.1 2017/01/24 00:41:08 rmeden Exp $';

=head1 NAME

tv_grab_zz_sdjson - Grab TV listings from Schedules Direct SD-JSON service.

=head1 SYNOPSIS

tv_grab_zz_sdjson --help

tv_grab_zz_sdjson --info

tv_grab_zz_sdjson --version

tv_grab_zz_sdjson --capabilities

tv_grab_zz_sdjson --description
[...1475 lines suppressed...]
	# write channels
	for my $channel (@{$channels}) {
		write_channel($w, $channel_index{$channel}, $channel_map{$channel});
	}

	# write programs
	for my $channel (@{$channels}) {
		my $schedules = $cache_schedules->{$channel};
		for my $day (sort(keys %{$schedules})) {
			for my $program (@{$schedules->{$day}->{'programs'}}) {
				write_programme($w, $channel_index{$channel}, $program, $cache_programs->{$program->{'programID'}});
			}
		}
	}

	$w->end();
	print STDERR "Done\n" unless $quiet;
}

grab_listings($conf);


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