Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -r1.332.2.138 -r1.332.2.139 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 4 Sep 2023 15:55:29 -0000 1.332.2.138 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 13 Sep 2023 22:26:37 -0000 1.332.2.139 @@ -2613,15 +2613,16 @@ } else { ::xowiki::Package require_site_wide_pages set form_id [::${:id} instantiate_forms -forms en:folder.form] - set f [FormPage new -destroy_on_cleanup \ + set f [FormPage new \ -name $name \ -text "" \ -package_id ${:id} \ -parent_id $parent_id \ -nls_language en_US \ -publish_status ready \ -instance_attributes {} \ - -page_template $form_id] + -page_template $form_id \ + -destroy_on_cleanup ] $f save_new set folder_id [$f item_id] @@ -2796,14 +2797,15 @@ } else { set days 10 } - set r [RSS new -destroy_on_cleanup \ + set r [RSS new \ -package_id ${:id} \ -parent_ids [:query_parameter parent_ids:int32,0..n ""] \ -name_filter $name_filter \ -entries_of $entries_of \ -title $title \ -description $description \ - -days $days] + -days $days \ + -destroy_on_cleanup ] set :mime_type text/xml return [$r render]