Index: openacs-4/packages/xowf/xowf.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/xowf.info,v
diff -u -r1.3.2.6 -r1.3.2.7
--- openacs-4/packages/xowf/xowf.info 11 May 2016 09:02:24 -0000 1.3.2.6
+++ openacs-4/packages/xowf/xowf.info 2 Sep 2016 07:31:47 -0000 1.3.2.7
@@ -8,6 +8,7 @@
f
f
t
+ xowf
Gustaf Neumann
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
}