From 76d5db9390aa0468ba7a7d385055aaefb31d48bd Mon Sep 17 00:00:00 2001
From: Ron Kellam <ron_kellam@yahoo.com>
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