Index: openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl,v diff -u -r1.31 -r1.31.2.1 --- openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl 17 Jul 2018 13:32:18 -0000 1.31 +++ openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl 11 Mar 2021 10:14:52 -0000 1.31.2.1 @@ -642,12 +642,8 @@ set list_of_vars [list] # Ben: some annoying stuff to do here since we are passing in things in GET format already - if {$pass_in_vars ne ""} { - set vars [split $pass_in_vars "&"] - foreach var $vars { - set things [split $var "="] - lappend list_of_vars $things - } + foreach {key value} [ns_set array [ns_parsequery $pass_in_vars]] { + lappend list_of_vars [list $key $value] } # Get the current month, day, and the first day of the month