Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -r1.241 -r1.242 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 30 Apr 2008 07:29:14 -0000 1.241 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 5 May 2008 12:29:17 -0000 1.242 @@ -1187,7 +1187,7 @@ if {[info exists $marker]} return foreach n $nodes { - if {![$n istype ::xowiki::FormField]} continue + if {![$n istype ::xowiki::formfield::FormField]} continue set ::_form_field_names([$n name]) $n my form_field_index [$n info children] } @@ -1425,7 +1425,7 @@ #my msg "short_spec for $name = '$short_spec'" if {$short_spec ne ""} { - set f [FormField new -volatile -name $name -spec $short_spec] + set f [::xowiki::formfield::FormField new -volatile -name $name -spec $short_spec] return [$f pretty_value $value] } return $value