Index: openacs-4/packages/xotcl-core/tcl/generic-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/generic-procs.tcl,v
diff -u -r1.104 -r1.105
--- openacs-4/packages/xotcl-core/tcl/generic-procs.tcl	12 Apr 2018 06:40:32 -0000	1.104
+++ openacs-4/packages/xotcl-core/tcl/generic-procs.tcl	25 Apr 2018 19:47:48 -0000	1.105
@@ -72,7 +72,7 @@
   }
 
   Form instproc form_vars {} {
-    set vars [list]
+    set vars {}
     foreach varspec [:fields] {
       lappend vars [lindex [split [lindex $varspec 0] :] 0]
     }