From 76d5db9390aa0468ba7a7d385055aaefb31d48bd Mon Sep 17 00:00:00 2001 From: Ron Kellam Date: Sun, 13 Jun 2010 22:13:00 +1200 Subject: [PATCH] Fix passing in the error ref to DateCalc. It seems that Date::Manip::DateCalc in some versions require that you parse in a ref for the error ref, passing in undef causes it to not perform the date calculation. Parse in a ref, even if we don't actually check it. Thanks to Ron Kellam for doing some leg work on tracking this issue down. --- bin/mythtv-status | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/bin/mythtv-status b/bin/mythtv-status index 1119887..7e7b7ea 100755 --- a/bin/mythtv-status +++ b/bin/mythtv-status @@ -388,7 +388,8 @@ my @blocks = ( return $next_time if $next_time eq 'Never' || $next_time eq 'now'; - my $delta = DateCalc('now', $next_time, undef, 1); + my $err; + my $delta = DateCalc('now', $next_time, \$err, 1); my $str = Delta_Format($delta, 0, '%hh Hours, %mv Minutes'); my $seconds = Delta_Format($delta, 0, '%sh'); -- 2.30.2