Index: openacs-4/packages/xowiki/tcl/weblog-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/weblog-procs.tcl,v
diff -u -r1.75.2.21 -r1.75.2.22
--- openacs-4/packages/xowiki/tcl/weblog-procs.tcl	15 Dec 2022 19:30:02 -0000	1.75.2.21
+++ openacs-4/packages/xowiki/tcl/weblog-procs.tcl	18 May 2023 13:42:44 -0000	1.75.2.22
@@ -58,7 +58,7 @@
     set extra_where_clause ""
 
     if {${:date} ne ""} {
-      if {![regexp {^\d\d\d\d[-]\d\d[-]\d\d$} ${:date}]} {
+      if {![regexp {^\d\d\d\d[-]\d?\d[-]\d?\d$} ${:date}]} {
         ns_log Warning "invalid date '${:date}'"
         ad_return_complaint 1 "invalid date"
         ad_script_abort