Index: openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.tcl,v
diff -u -N -r1.35.2.1 -r1.35.2.2
--- openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.tcl	16 Jun 2019 11:33:07 -0000	1.35.2.1
+++ openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.tcl	23 Mar 2023 17:22:30 -0000	1.35.2.2
@@ -423,7 +423,13 @@
 	set due_date_p 1
 	
 	set title [evaluation::safe_url_name -name $title]
-	set cal_due_date [calendar::to_sql_datetime -date $due_date -time $due_date -time_p 1]
+        set due_hours   [template::util::date::get_property hours $due_date]
+        set due_minutes [template::util::date::get_property minutes $due_date]
+        set due_year    [template::util::date::get_property year $due_date]
+        set due_month   [template::util::date::get_property month $due_date]
+        set due_day     [template::util::date::get_property day $due_date]
+        set cal_due_date "$due_year-$due_month-$due_day $due_hours:$due_minutes"
+
 	set due_date_ansi [db_string set_date " *SQL* "]
 	
 	if {$cal_due_date eq "-- :"} {