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.168 -r1.169
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	14 Jan 2010 10:44:09 -0000	1.168
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	4 Mar 2010 10:43:41 -0000	1.169
@@ -278,9 +278,6 @@
             my set __state reset
             my initialize
           }
-          #my msg "[my name] [self] [my info class] before searchDefaults, validator='[my validator]'"
-          #::xotcl::Class::Parameter searchDefaults [self]; # TODO: will be different in xotcl 1.6.*
-          #my msg "[my name] [self] [my info class] after searchDefaults, validator='[my validator]'"
         } else {
           if {$s ne ""} {
             error [_ xowiki.error-form_constraint-unknown_spec_entry \
@@ -305,8 +302,8 @@
       } else {
         my class ::xowiki::formfield::text
       }
-      # TODO: reset_parameter? needed?
-      ::xotcl::Class::Parameter searchDefaults [self]; # TODO: will be different in xotcl 1.6.*
+      # set missing instance vars with defaults
+      my set_instance_vars_defaults
     }
     regsub -all {,\s+} $spec , spec
     foreach s [split $spec ,] {