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.127 -r1.128
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	23 Dec 2008 09:51:58 -0000	1.127
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	8 Jan 2009 11:10:32 -0000	1.128
@@ -240,7 +240,7 @@
         set definition_class [lindex [my procsearch $attribute] 0]
 	set method [my info methods $attribute]
         if {[string match "::xotcl::*" $definition_class] || $method eq ""} {
-          error [_ xowiki.error-form_constraint-unknown_attribute [list name [my name] entry $attribute]]
+          error [_ xowiki.error-form_constraint-unknown_attribute [list class [my info class] name [my name] entry $attribute]]
         }
         if {[catch {
           #