From fec3edd5163ff98215f956d357983f9d83eba33a Mon Sep 17 00:00:00 2001
From: Matthew Wilson <matt@plainblack.com>
Date: Fri, 4 Nov 2005 05:57:11 +0000
Subject: [PATCH] fixed form error.

---
 lib/WebGUI/DateTime.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/WebGUI/DateTime.pm b/lib/WebGUI/DateTime.pm
index fc15a3274..3b3bff395 100644
--- a/lib/WebGUI/DateTime.pm
+++ b/lib/WebGUI/DateTime.pm
@@ -646,6 +646,7 @@ A string in the format of YYYY-MM-DD or YYYY-MM-DD HH:MM:SS.
 
 sub setToEpoch {
         my $set = shift;
+        return undef unless defined $set;
 	my $parser = DateTime::Format::Strptime->new( pattern => '%Y-%m-%d %H:%M:%S' );
 	my $dt = $parser->parse_datetime($set);
 	# in epochToSet we apply the user's time zone, so now we have to remove it.