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.75.2.7 -r1.75.2.8 --- openacs-4/packages/xotcl-core/tcl/context-procs.tcl 30 Sep 2019 21:20:30 -0000 1.75.2.7 +++ openacs-4/packages/xotcl-core/tcl/context-procs.tcl 1 Oct 2019 19:55:51 -0000 1.75.2.8 @@ -523,7 +523,8 @@ set value [next $name $default] } if {[info exists constraint] && $value ne ""} { - nsf::parseargs value:$constraint $value + nsf::parseargs $name:$constraint $value + set value [set $name] } return $value }