From f8e6b7f69fc217262b838ba812277e3d42fd6422 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Thu, 2 Jun 2016 21:40:58 +0200
Subject: make btl importer less pedantic


diff --git a/rhautoimport-btl b/rhautoimport-btl
index 2144053..b07c5b9 100755
--- a/rhautoimport-btl
+++ b/rhautoimport-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";
-- 
cgit v0.10.2