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.290 -r1.291 --- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 24 Oct 2024 17:02:23 -0000 1.290 +++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 25 Nov 2024 16:24:22 -0000 1.291 @@ -284,7 +284,16 @@ } set :html(id) ${:id} #if {[info exists :default]} {set :value [:default]} - :config_from_spec ${:spec} + + # + # An invalid spec could leave the broken formfield object behind. + # + try { + :config_from_spec ${:spec} + } on error {errmsg} { + :destroy + error $errmsg + } } #