Index: openacs-4/packages/xowf/tcl/xowf-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/xowf-procs.tcl,v diff -u -r1.3.2.7 -r1.3.2.8 --- openacs-4/packages/xowf/tcl/xowf-procs.tcl 11 May 2016 07:00:07 -0000 1.3.2.7 +++ openacs-4/packages/xowf/tcl/xowf-procs.tcl 2 Sep 2016 07:31:47 -0000 1.3.2.8 @@ -219,8 +219,11 @@ if {![info exists form_object] && [string is integer -strict $form_id] && $form_id > 0 - && ![my isobject ::$form_id]} { - ::xo::db::CrClass get_instance_from_db -item_id $form_id + } { + # just load the object conditionally + if {![my isobject ::$form_id]} { + ::xo::db::CrClass get_instance_from_db -item_id $form_id + } set form_object ::$form_id }