Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v
diff -u -r1.248.2.26 -r1.248.2.27
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	8 Sep 2016 09:45:18 -0000	1.248.2.26
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	12 Sep 2016 10:45:17 -0000	1.248.2.27
@@ -743,7 +743,7 @@
   ::Serializer exportMethods {
     ::xotcl::Class instproc extend_slot_default
   }
-  Class instproc extend_slot_default {name value} {
+  Class create instproc extend_slot_default {name value} {
     # Search for the slot. If the slot exists, extend it's default
     # value with the new value
     foreach c [my info heritage] {