diff options
| -rwxr-xr-x | rhimport-oi | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rhimport-oi b/rhimport-oi index a08490d..b2d5377 100755 --- a/rhimport-oi +++ b/rhimport-oi @@ -85,7 +85,7 @@ print "day of next Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@impor print "Number of next broadcast: " . $broadcast_num . "\n"; my $id = sprintf("%04d-%02d-%02d", @import_date); -my $bdfile = sprintf('.*ondainfo_%d.*\.mp3$', $broadcast_num); +my $bdfile = sprintf('.*onda.?info_%d.*\.mp3$', $broadcast_num); my $current_stat = `cat $STAT_FILE`; my ($current_id, $current_file) = $current_stat =~ m/^(.*)\n(.*)/; |