make btl importer less pedantic

1 files changed, 1 insertions, 1 deletions

diff --git a/rhimport-btl b/rhimport-btl
index 600535f..240f3a9 100755
--- a/rhimport-btl
+++ b/rhimport-btl
@@ -86,7 +86,7 @@ print "ending of current broadcast cycle: " . Date::Calc::Date_to_Text(@broadcas
 
 my $id = sprintf("%04d-%02d-%02d", @import_date);
 my $bd = sprintf("%04d-%02d-%02d", @broadcast_date);
-my $bdfile = sprintf("%02d%02d%02d-btlv128\.mp3", $broadcast_date[0]%100, $broadcast_date[1], $broadcast_date[2]);
+my $bdfile = sprintf("%02d%02d%02d.*-btlv128\.mp3", $broadcast_date[0]%100, $broadcast_date[1], $broadcast_date[2]);
 
 print "looking for files like '$bdfile' in RSS Feed\n";
 print " -> $RSS_URL\n";