summaryrefslogtreecommitdiff
path: root/rhautoimport-ab
diff options
context:
space:
mode:
authorChristian Pointner <equinox@helsinki.at>2018-03-15 12:37:46 (GMT)
committerChristian Pointner <equinox@helsinki.at>2018-03-15 12:37:46 (GMT)
commite0e3d971c58733ea937d75bcf6e30e1ba10c465c (patch)
tree15d89cfd3402eac929c2d5d9d508a3d66ea2a272 /rhautoimport-ab
parente82384ec81d4ec1b657432ed06e8b2448f07b1b6 (diff)
fix ab importer
Diffstat (limited to 'rhautoimport-ab')
-rwxr-xr-xrhautoimport-ab6
1 files changed, 3 insertions, 3 deletions
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 {