Index: openacs-4/packages/xotcl-core/tcl/context-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/context-procs.tcl,v diff -u -r1.61 -r1.62 --- openacs-4/packages/xotcl-core/tcl/context-procs.tcl 1 Nov 2012 23:06:56 -0000 1.61 +++ openacs-4/packages/xotcl-core/tcl/context-procs.tcl 12 Nov 2012 14:37:26 -0000 1.62 @@ -552,7 +552,7 @@ set encodeCmd ns_urlencode if {$::xo::naviserver} {lappend decodeCmd --; lappend encodeCmd --} - set query [{*}$encodeCmd $var]=[{*}$encodeCmd -- $value] + set query [{*}$encodeCmd $var]=[{*}$encodeCmd $value] foreach pair [split $old_query &] { foreach {key value} [split $pair =] break if {[{*}$decodeCmd $key] eq $var} continue