From eb3024ca7eee2ad8922c9e5f18d3f3f4d8a5a6e3 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Mon, 31 Oct 2005 19:14:49 +0000
Subject: [PATCH] forward port of sf bug for noDate switch

---
 lib/WebGUI/Form/Date.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Form/Date.pm b/lib/WebGUI/Form/Date.pm
index 0d56a2335..33cb998cf 100644
--- a/lib/WebGUI/Form/Date.pm
+++ b/lib/WebGUI/Form/Date.pm
@@ -125,7 +125,12 @@ Renders a date picker control.
 
 sub toHtml {
         my $self = shift;
-	$self->{value} = WebGUI::DateTime::epochToSet($self->{value}) unless ($self->{noDate} && $self->{value} eq '');
+	if ($self->{noDate} ) {
+		$self->{value} = '';
+	}
+	else {
+		$self->{value} = WebGUI::DateTime::epochToSet($self->{value});
+	}
 	my $language  = WebGUI::International::getLanguage($session{user}{language},"languageAbbreviation");
 	unless ($language) {
 		$language = WebGUI::International::getLanguage("English","languageAbbreviation");