Index: openacs-4/packages/xowf/xowf.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/xowf.info,v diff -u -r1.12.2.81 -r1.12.2.82 --- openacs-4/packages/xowf/xowf.info 23 Mar 2022 20:40:59 -0000 1.12.2.81 +++ openacs-4/packages/xowf/xowf.info 25 Mar 2022 19:28:16 -0000 1.12.2.82 @@ -10,17 +10,17 @@ t xowf - + Gustaf Neumann XoWiki Content Flow - an XoWiki based workflow system implementing state-based behavior of wiki pages and forms 2021-09-15 WU Vienna BSD-Style 2 - + - + Index: openacs-4/packages/xowf/lib/answer-single-question.wf =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/lib/answer-single-question.wf,v diff -u -r1.1.2.7 -r1.1.2.8 --- openacs-4/packages/xowf/lib/answer-single-question.wf 24 Jan 2022 18:11:37 -0000 1.1.2.7 +++ openacs-4/packages/xowf/lib/answer-single-question.wf 25 Mar 2022 19:28:16 -0000 1.1.2.8 @@ -21,7 +21,7 @@ # via a workflow definition ($obj is a workflow definition) # set package_id [$obj package_id] - set parent_id [$package_id query_parameter parent_id:int32] + set parent_id [$package_id query_parameter parent_id:cr_item_of_package,arg=$package_id] set parent_obj [::xo::db::CrClass get_instance_from_db -item_id $parent_id] set name [ns_md5 $parent_id-[::xo::cc set untrusted_user_id]] 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.28.2.70 -r1.28.2.71 --- openacs-4/packages/xowf/tcl/xowf-procs.tcl 25 Feb 2022 12:56:18 -0000 1.28.2.70 +++ openacs-4/packages/xowf/tcl/xowf-procs.tcl 25 Mar 2022 19:28:16 -0000 1.28.2.71 @@ -2000,7 +2000,7 @@ # If these values are not set, try to obtain it the old-fashioned way. # if {$parent_id == 0} { - set parent_id [:query_parameter parent_id:int32 [$package folder_id]] + set parent_id [:query_parameter parent_id:cr_item_of_package,arg=${:package_id} [$package folder_id]] } if {$name eq ""} { set name [:property name ""]