From e0e3d971c58733ea937d75bcf6e30e1ba10c465c Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Thu, 15 Mar 2018 13:37:46 +0100
Subject: fix ab importer


diff --git a/INFO b/INFO
index 807178b..4a481e5 100644
--- a/INFO
+++ b/INFO
@@ -118,4 +118,4 @@
    Original: vierter Freitag im Monat
    Upload: ein paar tage davor? (bisher nur ein Upload)
    Such-Kriterium: cba:broadcastDate
-   RH: 4wöchentlich, Woche 3, Donnerstag, 15:00-16:00
+   RH: 4wöchentlich, Woche 3, Freitag, 15:00-16:00
diff --git a/rhautoimport-ab b/rhautoimport-ab
index 537fd07..3ff1b53 100755
--- a/rhautoimport-ab
+++ b/rhautoimport-ab
@@ -42,7 +42,7 @@ my $RD_GROUP = "yearabroad";
 my $PV_ID = '672';
 my $TITLE = "A Year Abroad";
 my $LAST_RUN = 0;
-my $upload_delay_days = -3;   # files are usally there at least 3 days before original broadcast?? histroy will tell!
+my $upload_delay_days = -3;   # files are usally there at least 3-1 days before original broadcast?? history will tell!
 
 binmode(STDIN, ":utf8");
 binmode(STDOUT, ":utf8");
@@ -50,7 +50,7 @@ binmode(STDERR, ":utf8");
 
 my $curweek = RHRD::utils::get_rd_week();
 
-if($curweek == 2) {
+if($curweek == 3) {
   if($#ARGV >= 0 && $ARGV[0] eq 'last') {
     print "!!!This is the last attempt, there won't be a retry on error!!!\n";
     $LAST_RUN = 1;
@@ -72,7 +72,7 @@ if($curweek == 1) {
 } elsif($curweek == 2) {
   @import_date = Date::Calc::Add_Delta_Days(@import_date, 7);
 } elsif($curweek == 3) {
-  if($dow > 4) {
+  if($dow > 5) {
     @import_date = Date::Calc::Add_Delta_Days(@import_date, 28);
   }
 } else {
-- 
cgit v0.10.2