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 -N -r1.216 -r1.217
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	21 Aug 2012 15:43:32 -0000	1.216
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	22 Aug 2012 18:46:00 -0000	1.217
@@ -114,7 +114,7 @@
   # application classes
   FormField instproc initialize {} {next}
 
-  FormField instproc get_dom_spec {} {
+  FormField instproc get_json {} {
       return [util_spec2json [list [my get_spec]]]
   }
 
@@ -3471,8 +3471,7 @@
 
     if { ![my disabled] } {
       $flyweight value ""
-      set spec [$flyweight get_dom_spec]
-      #my log ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> [$flyweight info class] spec=$spec [$flyweight serialize] --- [my serialize]"
+      set spec [$flyweight get_json]
       html::a -spec $spec -href "#" -onclick "return wu.repeatable.addChoice(this);" { html::t "add another" }
     }
   }