diff options
Diffstat (limited to 'linhes/linhes-system/misc_which_recorder.pl')
-rwxr-xr-x | linhes/linhes-system/misc_which_recorder.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/linhes/linhes-system/misc_which_recorder.pl b/linhes/linhes-system/misc_which_recorder.pl index 05c8600..57947f1 100755 --- a/linhes/linhes-system/misc_which_recorder.pl +++ b/linhes/linhes-system/misc_which_recorder.pl @@ -61,7 +61,7 @@ else while (<$fh>) { # Myth .25 & .27 regex to find start of recording for digital and analog MPEG - if (/^(\d+-\d+-\d+T\d+\:\d+\:\d+)(?:.*) (?:Started|Tuning) recording: (.*): channel (\d+) on cardid \[(\d+)\], sourceid (\d+)/ || /^(\d+-\d+-\d+T\d+\:\d+\:\d+)(?:.*) \(UpdateRecStatus\) Updating status for (.*)() on cardid \[(\d+)\] \(Will Record => Recording\)()/) + if (/^(\D\D\D +\d+ \d+\:\d+\:\d+)(?:.*) \(HandleRecordingStatusChange\) (?:Started|Tuning) recording: (.*): channel (\d+) on cardid \[(\d+)\], sourceid (\d+)/ || /^(\d+-\d+-\d+T\d+\:\d+\:\d+)(?:.*) \(UpdateRecStatus\) Updating status for (.*)() on cardid \[(\d+)\] \(Will Record => Recording\)()/) { if ($mode eq "--noheader") { @@ -77,7 +77,7 @@ while (<$fh>) ($time, $title, $chanid, $cardid, $sourceid) = ($1, $2, $3, $4, $5); $time =~ s/T/' '/; - $time = `date -d $time +%a' '%m/%d' '%l:%M' '%p`; + $time = `date -d "$time" +%a' '%-m/%-d' '%l:%M' '%p`; chomp ($time); if (($title =~ /"?(.+)"?:"?(.*)"?/) || ($title =~ /(.+) "(.*)"/)) { |