Changeset 48

Timestamp:

10/08/06 22:26:29 (7 years ago)

Author:

lincoln

Message:

SBS news support for d1 + quieten down being called with debug enabled

Files:

• grabbers/d1 (modified) (5 diffs)
• status (modified) (1 diff)

grabbers/d1

@@ -6 +6 @@
 =head1 NAME
 
-tv_grab_au (0.6.2.2) - Grab TV listings for Australia.
+tv_grab_au (0.6.2.3) - Grab TV listings for Australia.
 
 =head1 SYNOPSIS
@@ -117 +117 @@
 use XMLTV::Usage <<END
 
-$0 (0.6.2.2): grab Australian television listings in XMLTV format
+$0 (0.6.2.3): grab Australian television listings in XMLTV format
 To configure: $0 --configure [--config-file FILE]
 To grab listings: $0 [--config-file FILE] [--output FILE] [--days N]
@@ -179 +179 @@
 
 # set user-agent manually
-$XMLTV::Get_nice::ua->agent("tv_grab_au/0.6.2.2");
+$XMLTV::Get_nice::ua->agent("tv_grab_au/0.6.2.3");
 
 my ($opt_days, $opt_offset, $opt_help, $opt_output,
@@ -243 +243 @@
 my $proc_time = ParseDate('now');
 
-print "d1 v0.6.2.2  tv_grab_au\n";
+print "d1 v0.6.2.3  tv_grab_au\n";
 printf "d1 grabs tv guide data from Development 1 Australia (www.d1.com.au).\n" if $opt_desc;
 exit(0) if ($opt_version || $opt_desc);
 
 if (($opt_channels_file) && ($opt_region) && ($opt_output)) {
+  printf "called from shepherd!\n";
+  $opt_debug = 0; # hack - shepherd calls with --debug which is noisy in here
   # called from shepherd!
   if ($opt_timezone) {
@@ -296 +298 @@
         elsif ($chan eq "ABC2")         { $chan_name .= "2-2"; }
         elsif ($chan eq "SBS")          { $chan_name .= "SBS"; }
+        elsif ($chan eq "SBS News")     { $chan_name .= "SBS-2"; }
         elsif ($chan eq "Seven")        { $chan_name .= "7"; }
         elsif ($chan eq "Nine")         { $chan_name .= "9"; }

status

@@ -6 +6 @@
 yahoo7widget:1.53:grabber
 jrobbo:0.01:grabber
-d1:0.6.2.2:grabber
+d1:0.6.2.3:grabber