diff options
| author | Christian Pointner <equinox@helsinki.at> | 2016-02-12 15:28:42 (GMT) |
|---|---|---|
| committer | Christian Pointner <equinox@helsinki.at> | 2016-02-12 15:30:29 (GMT) |
| commit | a50293d68c027412248e4f2d4c6372a8eeff7687 (patch) | |
| tree | 55513b7e41bf11b1dbfc942cba049397e7e8a031 | |
| parent | 553c89a24cea6aff7bcf6c0099aaaedc2f5b954b (diff) | |
allow dashes in date format for tierrechtsradio
| -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"; |