diff options
| -rw-r--r-- | debian/changelog | 6 | ||||
| -rwxr-xr-x | rhimport-rs | 2 |
2 files changed, 7 insertions, 1 deletions
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"; |