Index: openacs-4/packages/xowf/tcl/test-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test-item-procs.tcl,v
diff -u -N -r1.7.2.76 -r1.7.2.77
--- openacs-4/packages/xowf/tcl/test-item-procs.tcl	26 Aug 2020 18:51:40 -0000	1.7.2.76
+++ openacs-4/packages/xowf/tcl/test-item-procs.tcl	26 Aug 2020 18:55:47 -0000	1.7.2.77
@@ -1360,9 +1360,8 @@
       #
       # return the workflow denoted by the property wfName in obj
       #
-      return [::xowiki::Weblog instantiate_forms \
+      return [::[$obj package_id] instantiate_forms \
                   -parent_id    [$obj item_id] \
-                  -package_id   [$obj package_id] \
                   -default_lang [$obj lang] \
                   -forms        [$obj property wfName]]
     }
@@ -2437,8 +2436,7 @@
         set ref
       }]
       set questionNames [join $questions |]
-      set questionForms [::xowiki::Weblog instantiate_forms \
-                             -package_id [$obj package_id] \
+      set questionForms [::[$obj package_id] instantiate_forms \
                              -default_lang [$obj lang] \
                              -forms $questionNames]