Changeset 488

Timestamp:

02/03/07 18:16:35 (6 years ago)

Author:

lincoln

Message:

minor gap fixes for abc_website/abc2_website

Files:

• grabbers/abc2_website (modified) (3 diffs)
• grabbers/abc_website (modified) (3 diffs)
• status (modified) (1 diff)

grabbers/abc2_website

@@ -22 +22 @@
 my $progname = "abc2_website";
 my $chan_id = "ABC2";
-my $version = "2.06";
+my $version = "2.07";
 
 use LWP::UserAgent;
@@ -289 +289 @@
                                 foreach my $g (@{($gaps->{$chan_id})}) {
                                         my ($s, $e) = split(/-/,$g);
-                                        if (($s >= $currtime) && ($e <= ($currtime+86400))) {
+                                        if (($s >= $currtime) && ($s <= ($currtime+86400))) {
                                                 $found_gap_match++;
                                                 push(@gap_s,$s);
@@ -419 +419 @@
                         for (my $g_num = 0; $g_num < $#gap_s; $g_num++) {
                                 $found_gap_match++
-                                  if ((($gap_s[$g_num] <= $unprocessed_starttime[$i]) &&
+                                  if ((($gap_s[$g_num] >= $unprocessed_starttime[$i]) &&
                                        ($gap_s[$g_num] <= $unprocessed_starttime[$i+1])) ||
-                                      (($gap_e[$g_num] <= $unprocessed_starttime[$i]) &&
-                                       ($gap_e[$g_num] <= $unprocessed_starttime[$i+1])));
+                                      (($gap_e[$g_num] >= $unprocessed_starttime[$i]) &&
+                                       ($gap_e[$g_num] <= $unprocessed_starttime[$i+1])) ||
+                                      (($gap_s[$g_num] <= $unprocessed_starttime[$i]) &&
+                                       ($gap_e[$g_num] >= $unprocessed_starttime[$i+1])));
                         }
                         next if (!$found_gap_match);

grabbers/abc_website

@@ -22 +22 @@
 my $progname = "abc_website";
 my $chan_id = "ABC";
-my $version = "2.06";
+my $version = "2.07";
 
 use LWP::UserAgent;
@@ -289 +289 @@
                                 foreach my $g (@{($gaps->{$chan_id})}) {
                                         my ($s, $e) = split(/-/,$g);
-                                        if (($s >= $currtime) && ($e <= ($currtime+86400))) {
+                                        if (($s >= $currtime) && ($s <= ($currtime+86400))) {
                                                 $found_gap_match++;
                                                 push(@gap_s,$s);
@@ -419 +419 @@
                         for (my $g_num = 0; $g_num < $#gap_s; $g_num++) {
                                 $found_gap_match++
-                                  if ((($gap_s[$g_num] <= $unprocessed_starttime[$i]) &&
+                                  if ((($gap_s[$g_num] >= $unprocessed_starttime[$i]) &&
                                        ($gap_s[$g_num] <= $unprocessed_starttime[$i+1])) ||
-                                      (($gap_e[$g_num] <= $unprocessed_starttime[$i]) &&
-                                       ($gap_e[$g_num] <= $unprocessed_starttime[$i+1])));
+                                      (($gap_e[$g_num] >= $unprocessed_starttime[$i]) &&
+                                       ($gap_e[$g_num] <= $unprocessed_starttime[$i+1])) ||
+                                      (($gap_s[$g_num] <= $unprocessed_starttime[$i]) &&
+                                       ($gap_e[$g_num] >= $unprocessed_starttime[$i+1])));
                         }
                         next if (!$found_gap_match);

status

@@ -2 +2 @@
 grabber         yahoo7widget        1.78
 grabber         rex                 3.4.0
-grabber         abc_website         2.06
-grabber         abc2_website        2.06
+grabber         abc_website         2.07
+grabber         abc2_website        2.07
 grabber         sbsnews_website     0.04
 grabber         oztivo              0.13-r1