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.542.2.138 -r1.542.2.139 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 19 Jan 2022 19:52:51 -0000 1.542.2.138 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 28 Jan 2022 20:05:41 -0000 1.542.2.139 @@ -3335,6 +3335,7 @@ if {$name ni {langmarks fontname fontsize formatblock} && ![string match *__locale $name]} { set names [list] + #xo::show_stack foreach f $form_fields {lappend names [$f name]} :msg "No form field with name '$name' found\ (available fields: [lsort [array names ::_form_field_names]])" @@ -4854,6 +4855,13 @@ if {$page eq ""} { ad_log error "Could not resolve parameter page '$pp' of FormPage [self]." } + # + # The following block should not be necessary + # + if {![::nsf::is object $page]} { + ad_log warning "We have to refetch parameter page" + ::xo::db::CrClass get_instance_from_db -item_id [string trimleft $page :] + } if {$page ne "" && [$page exists instance_attributes]} { set __ia [$page set instance_attributes]