diff options
| -rw-r--r-- | debian/changelog | 6 | ||||
| -rwxr-xr-x | rhimport-tr | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/debian/changelog b/debian/changelog index 7346d1e..5f6dc12 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +rhimport (0.3.15-42) unstable; urgency=medium + + * allow dashes in date format for TR and NW + + -- Christian Pointner <equinox@helsinki.at> Fri, 12 Feb 2016 16:26:29 +0100 + rhimport (0.3.15-41) unstable; urgency=medium * fixed utf-8 issue with uri_unescape (for playlists) diff --git a/rhimport-tr b/rhimport-tr index d86bdb9..e02ae0c 100755 --- a/rhimport-tr +++ b/rhimport-tr @@ -86,7 +86,7 @@ print "day of original broadcast: " . Date::Calc::Date_to_Text(@broadcast_day) . print "day of Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@import_date) . "\n"; my $bd = sprintf("%04d-%02d-%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]); -my $bdfile = sprintf("^%04d%02d%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]); +my $bdfile = sprintf("^%04d-?%02d-?%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]); print "looking for files from $bd in RSS Feed\n"; print " -> $RSS_URL\n"; |