Index: openacs-4/packages/calendar/www/cal-item-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-item-new.tcl,v
diff -u -N -r1.41 -r1.41.2.1
--- openacs-4/packages/calendar/www/cal-item-new.tcl	30 Apr 2018 13:54:38 -0000	1.41
+++ openacs-4/packages/calendar/www/cal-item-new.tcl	17 Apr 2019 19:42:59 -0000	1.41.2.1
@@ -16,6 +16,14 @@
     {end_time ""}
     {view "day"}
     {return_url:localurl "./"}
+}  -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) is not valid. It has to be in the form YYYY-MM-DD."
+            }
+        }
+    }
 }
 auth::require_login
 
Index: openacs-4/packages/calendar/www/view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view.tcl,v
diff -u -N -r1.32 -r1.32.2.1
--- openacs-4/packages/calendar/www/view.tcl	7 Aug 2017 23:48:05 -0000	1.32
+++ openacs-4/packages/calendar/www/view.tcl	17 Apr 2019 19:42:59 -0000	1.32.2.1
@@ -19,7 +19,7 @@
             if {[catch {set date [clock format [clock scan $date -format "%Y-%m-%d"] -format "%Y-%m-%d"]} err]
                 && [catch {set date [clock format [clock scan $date  -format "%Y%m%d"] -format "%Y-%m-%d"]} err]
             } {
-                ad_complain "Your input was not valid. It has to be in the form YYYY-MM-DD."
+                ad_complain "Your input is not valid. It has to be in the form YYYY-MM-DD."
             }
         }
     }
Index: openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl,v
diff -u -N -r1.39 -r1.39.2.1
--- openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl	29 Jun 2018 17:27:18 -0000	1.39
+++ openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl	17 Apr 2019 19:42:59 -0000	1.39.2.1
@@ -26,13 +26,11 @@
     {date ""}
     {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."
+                ad_complain "Your input ($date) is not valid. It has to be in the form YYYY-MM-DD."
             }
         }
     }