From cc278c1a0b5bc9c43a61edef8b506ae443ca0409 Mon Sep 17 00:00:00 2001
From: Andrew Ruthven <andrew@etc.gen.nz>
Date: Mon, 19 Nov 2007 21:43:56 +1300
Subject: [PATCH] Fix warning.

---
 bin/mythtv-status | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/mythtv-status b/bin/mythtv-status
index bbd44e8..f77a66b 100755
--- a/bin/mythtv-status
+++ b/bin/mythtv-status
@@ -121,7 +121,7 @@ my @blocks = (
       'find_next' => sub {
 	 my $vars = shift;
          return
-	   if $next_time eq 'now';
+	   if defined $next_time && $next_time eq 'now';
 
          my $date = ParseDate($vars->{'startTime'});
 	 if (! defined $next_time || Date_Cmp($date, $next_time) < 0) {
-- 
2.30.2