Index: openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl,v
diff -u -r1.6 -r1.6.2.1
--- openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl	29 Jun 2018 17:27:18 -0000	1.6
+++ openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl	14 Feb 2024 13:23:13 -0000	1.6.2.1
@@ -22,9 +22,7 @@
     @author Ben Adida (ben@openforce.net)
     @cvs-id $Id$
 } {
-    {period_days:optional}
-} -properties {
-    
+    {period_days:naturalnum,optional}
 }
 
 # get stuff out of the config array
Index: openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl,v
diff -u -r1.44.2.8 -r1.44.2.9
--- openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl	14 Jun 2023 08:47:14 -0000	1.44.2.8
+++ openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl	14 Feb 2024 13:23:13 -0000	1.44.2.9
@@ -23,19 +23,9 @@
 } {
     {view ""}
     {page_num:naturalnum 0}
-    {date ""}
+    {date:clock(%Y-%m-%d) ""}
     {period_days:naturalnum,optional}
     {julian_date ""}
-} -properties {
-
-} -validate {
-    valid_date -requires { date } {
-        if {$date ne "" } {
-            if {[catch {set date [clock format [clock scan $date] -format "%Y-%m-%d"]} err]} {
-                ad_complain "Your input ($date) was not valid. It has to be in the form YYYY-MM-DD."
-            }
-        }
-    }
 }
 
 # get stuff out of the config array
Index: openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl,v
diff -u -r1.20.2.4 -r1.20.2.5
--- openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl	14 Jun 2023 08:47:14 -0000	1.20.2.4
+++ openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl	14 Feb 2024 13:23:13 -0000	1.20.2.5
@@ -21,20 +21,10 @@
 } {
     {view ""}
     {page_num:naturalnum 0}
-    {date ""}
+    {date:clock(%Y-%m-%d) ""}
     {julian_date ""}
     {period_days:naturalnum,optional ""}
     {sort_by ""}
-} -properties {
-    
-}  -validate {
-    valid_date -requires { date } {
-        if {$date ne "" } {
-            if {[catch {set date [clock format [clock scan $date] -format "%Y-%m-%d"]} err]} {
-                ad_complain "Your input was not valid. It has to be in the form YYYY-MM-DD."
-            }
-        }
-    }
 }
 
 set calendar_url [ad_conn package_url]calendar/