From 69e2746d46e5f6095530e76297aeddc1f359d4fb Mon Sep 17 00:00:00 2001
From: djk <djk>
Date: Mon, 12 Jul 1999 12:53:31 +0000
Subject: [PATCH] got rid of warning in date conversion

---
 perl/DXUtil.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/perl/DXUtil.pm b/perl/DXUtil.pm
index a1fb13ba..1291db39 100644
--- a/perl/DXUtil.pm
+++ b/perl/DXUtil.pm
@@ -80,6 +80,7 @@ sub cltounix
 	return 0 unless $time =~ /^([012]\d)([012345]\d)Z$/;
 	$time = "$1:$2 +0000";
 	my $r = str2time("$date $time");
+	return $r unless $r;
 	return $r == -1 ? undef : $r;
 }
 
-- 
2.34.1