From 2023f680fb04d6139406c13e41f73e26903ce8d9 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Fri, 18 Nov 2016 01:24:26 +0100
Subject: relax radio stimme file regexp a bit


diff --git a/debian/changelog b/debian/changelog
index d8a8574..b084310 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+rhimport (0.3.15-59) unstable; urgency=medium
+
+  * relax radio stimme file regexp a bit
+
+ -- Christian Pointner <equinox@spreadspace.org>  Fri, 18 Nov 2016 01:23:55 +0100
+
 rhimport (0.3.15-58) unstable; urgency=medium
 
   * Werkstatt Radio is now on Saturday
diff --git a/rhimport-rs b/rhimport-rs
index bb1453a..94c4912 100755
--- a/rhimport-rs
+++ b/rhimport-rs
@@ -119,7 +119,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%02d(CBA)?(.*)\.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