From 1d349b9d8bd6908e7906448b2b0cdbe080e3586f Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Mon, 1 Oct 2018 18:18:52 +0200
Subject: added dte importer


diff --git a/Makefile b/Makefile
index 8dd5585..a4cd424 100644
--- a/Makefile
+++ b/Makefile
@@ -26,7 +26,7 @@ endif
 .PHONY: clean distclean
 
 EXECUTABLE := rhautoimport
-IMPORTER := ab btl dm dn dv ek er eu fb fl gd lr nw oi po pv rs ra tr wr xy
+IMPORTER := ab btl dm dn dte dv ek er eu fb fl gd lr nw oi po pv rs ra tr wr xy
 EXECUTABLES := $(IMPORTER:%=$(EXECUTABLE)-%)
 
 all: $(EXECUTABLE)
diff --git a/rhautoimport-dte b/rhautoimport-dte
index 3673a69..532cd01 100755
--- a/rhautoimport-dte
+++ b/rhautoimport-dte
@@ -29,8 +29,6 @@ use XML::Feed::Content;
 use XML::Feed::Enclosure;
 use URI::URL;
 use HTML::Entities;
-## TODO: remove me!
-use lib '../rhrdlibs/lib/';
 use RHRD::utils;
 
 use lib '/usr/local/share/rhautoimport/';
@@ -51,6 +49,10 @@ binmode(STDIN, ":utf8");
 binmode(STDOUT, ":utf8");
 binmode(STDERR, ":utf8");
 
+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;
+}
 rhautoimport::report_title_and_last($TITLE, $LAST_RUN);
 
 my @allowed_dbs = rhautoimport::get_dropboxes($RD_GROUP);
@@ -77,7 +79,7 @@ my @today = Date::Calc::Today();
 my $dow = Date::Calc::Day_of_Week(@today);
 my @import_date = Date::Calc::Standard_to_Business(@today);
 
-if($dow < 2 || $dow > 6) {
+if($dow <= 2 || $dow > 6) {
   $show_id = $allowed_dbs[$idx_tu]->{'SHOWID'};
   $show_title = $allowed_dbs[$idx_tu]->{'SHOWTITLE'};
   $rd_cart=$RD_CART_TU;
-- 
cgit v0.10.2