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 -N -r1.28.2.55 -r1.28.2.56
--- openacs-4/packages/xowf/tcl/xowf-procs.tcl	5 May 2021 12:15:56 -0000	1.28.2.55
+++ openacs-4/packages/xowf/tcl/xowf-procs.tcl	30 May 2021 19:00:00 -0000	1.28.2.56
@@ -168,7 +168,7 @@
   #     # Provide a method to delete the foreign key references, when
   #     # an item for an atjob is deleted. We do here the same magic
   #     # as in ::xowiki::Package to obtain the item_id
-  #     if {![info exists item_id]} {set item_id [:query_parameter item_id]}
+  #     if {![info exists item_id]} {set item_id [:query_parameter item_id:int32]}
   #     if {$item_id ne ""} {
   #       db_dml dbqd..xowf_delete "delete from xowf_atjob where owner_id = :item_id"
   #     }
@@ -1944,7 +1944,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:integer" [$package folder_id]]
+        set parent_id [:query_parameter parent_id:int32 [$package folder_id]]
       }
       if {$name eq ""} {
         set name [:property name ""]