added importer for fokus bildung

1 files changed, 3 insertions, 1 deletions

diff --git a/rhautoimport-ek b/rhautoimport-ek
index 3618577..a65af29 100755
--- a/rhautoimport-ek
+++ b/rhautoimport-ek
@@ -42,6 +42,7 @@ my $RD_GROUP = "eigenklang";
 my $PV_ID = '30';
 my $TITLE = "Eigenklang";
 my $LAST_RUN = 0;
+my $upload_delay_days = -3;   # files are usally there at least 3 days before original broadcast
 
 binmode(STDIN, ":utf8");
 binmode(STDOUT, ":utf8");
@@ -105,7 +106,8 @@ if(Date::Calc::Delta_Days(@broadcast_date, @import_date) <= 0) {
   }
 }
 print "day of latest original broadcast before next Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@broadcast_date) . "\n";
-if(Date::Calc::Delta_Days(@broadcast_date, @today) <= 2) { # files are usally there at least 2 days before original broadcast
+
+if(Date::Calc::Delta_Days(@broadcast_date, @today) <= $upload_delay_days) {
   print "File won't be available by now!\n";
   exit 42;
 }