From b59b3e5798202cc2e720c012cab0053f5fa4b889 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Mon, 7 Oct 2013 13:26:12 +0000
Subject: more relaxed check for radio stimme


diff --git a/rhimport-rs b/rhimport-rs
index 322d6fc..03d98c1 100755
--- a/rhimport-rs
+++ b/rhimport-rs
@@ -129,7 +129,7 @@ if(Date::Calc::Delta_Days(@broadcast_date, @today) <= 0) {
 
 my $id = sprintf("%04d-%02d-%02d", $import_date[0], $import_date[1], $import_date[2]);
 my $bd = sprintf("%04d-%02d-%02d", $broadcast_date[0], $broadcast_date[1], $broadcast_date[2]);
-my $bdfile = sprintf("RAST%04d%02d%02dCBA(.*)\.MP3", $broadcast_date[0], $broadcast_date[1], $broadcast_date[2]);
+my $bdfile = sprintf("RAST%04d%02d%02d(CBA)?(.*)\.MP3", $broadcast_date[0], $broadcast_date[1], $broadcast_date[2]);
 
 print "looking for files from $bd in RSS Feed\n";
 print " -> $RSS_URL\n";
-- 
cgit v0.10.2