Index: openacs-4/packages/acs-tcl/tcl/widgets-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/widgets-procs.tcl,v diff -u -r1.23.2.7 -r1.23.2.8 --- openacs-4/packages/acs-tcl/tcl/widgets-procs.tcl 26 Dec 2019 14:44:08 -0000 1.23.2.7 +++ openacs-4/packages/acs-tcl/tcl/widgets-procs.tcl 3 Jul 2020 07:27:29 -0000 1.23.2.8 @@ -232,7 +232,7 @@ set year "" } else { lassign [split $value "-"] year month day - # trim the day, in case we get as well a time stamp + # trim the day, in case we get as well a timestamp regexp {^([0-9]+) } $day _ day }