Index: openacs-4/packages/xml-rpc/tcl/validator-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xml-rpc/tcl/validator-procs.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/xml-rpc/tcl/validator-procs.tcl 25 Apr 2018 19:47:48 -0000 1.4 +++ openacs-4/packages/xml-rpc/tcl/validator-procs.tcl 9 May 2018 15:33:33 -0000 1.5 @@ -255,11 +255,11 @@ # for each year for {set y $startyear} {$y <= $endyear} {incr y} { - set year {} + set year [list] # for each month for {set m 1} {$m <= 12} {incr m} { - set month {} + set month [list] # for each day set mstr [format %02d $m] for {set d 1} {$d <= 31} {incr d} {