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.131 -r1.132
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	12 Feb 2009 15:07:15 -0000	1.131
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	14 Feb 2009 13:39:07 -0000	1.132
@@ -442,7 +442,7 @@
     return $v
   }
 
-  FormField instproc value_if_nothing_is_returned_from_from {default} {
+  FormField instproc value_if_nothing_is_returned_from_form {default} {
     return $default
   }
 
@@ -1326,7 +1326,7 @@
     my set widget_type text(checkbox)
     next
   }
-  checkbox instproc value_if_nothing_is_returned_from_from {default} {
+  checkbox instproc value_if_nothing_is_returned_from_form {default} {
     return ""
   }
   checkbox instproc render_input {} {
@@ -2093,7 +2093,7 @@
   Class boolean -superclass radio -parameter {
     {default t}
   }
-  boolean instproc value_if_nothing_is_returned_from_from {default} {
+  boolean instproc value_if_nothing_is_returned_from_form {default} {
     return f
   }
   boolean instproc initialize {} {