Index: openacs-4/packages/acs-templating/tcl/date-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/date-procs.tcl,v
diff -u -N -r1.27.2.4 -r1.27.2.5
--- openacs-4/packages/acs-templating/tcl/date-procs.tcl	6 Jul 2004 19:59:23 -0000	1.27.2.4
+++ openacs-4/packages/acs-templating/tcl/date-procs.tcl	8 Jul 2004 04:10:39 -0000	1.27.2.5
@@ -411,6 +411,15 @@
 
 } {
 
+    # if value is an empty string, just return the date that was
+    # passed in, otherwise this procedure will fail.
+    # This is needed for the automated sql/linear conversion used by
+    # ad_form.
+
+    if {[empty_string_p $value]} {
+        return $date
+    }
+    
   # Erase leading zeroes from the value, but make sure that 00
   # is not completely erased - but only for single-element properties