Index: openacs-4/contrib/packages/project-manager/catalog/project-manager.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/catalog/Attic/project-manager.en_US.ISO-8859-1.xml,v diff -u -r1.1.2.11 -r1.1.2.12 --- openacs-4/contrib/packages/project-manager/catalog/project-manager.en_US.ISO-8859-1.xml 14 Jun 2005 20:45:20 -0000 1.1.2.11 +++ openacs-4/contrib/packages/project-manager/catalog/project-manager.en_US.ISO-8859-1.xml 16 Jun 2005 20:34:01 -0000 1.1.2.12 @@ -40,6 +40,8 @@ Attach a file? Average back to admin page + Bad Deadline + Please enter your deadline in yyyy-mm-dd format Cancel Cancel, do not delete Categories Index: openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-add-edit-2.tcl,v diff -u -r1.1.2.14 -r1.1.2.15 --- openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl 15 Jun 2005 16:40:15 -0000 1.1.2.14 +++ openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl 16 Jun 2005 20:34:02 -0000 1.1.2.15 @@ -68,6 +68,11 @@ foreach i $number { + #validate date + if { ![regexp {^\d{4}(\-)\d{1,2}(\-)\d{1,2}$} $date] } { + ad_return_error [_ project-manager.Bad_deadline] [_ project-manager.Bad_deadline_message] + } + set date_$i [split [lindex $date [expr $i-1]] "-"] set end_date_${i}(day) [lindex [set date_$i] 2] set end_date_${i}(month) [lindex [set date_$i] 1]