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
   }