Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -N -r1.542.2.104 -r1.542.2.105 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 15 Mar 2021 22:03:07 -0000 1.542.2.104 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 30 Mar 2021 09:01:49 -0000 1.542.2.105 @@ -70,7 +70,7 @@ -form ::xowiki::FileForm \ -parameter { {storage_type file} - } + } ::xo::db::CrClass create PodcastItem -superclass File \ -pretty_name "#xowiki.PodcastItem_pretty_name#" -pretty_plural "#xowiki.PodcastItem_pretty_plural#" \ @@ -1582,14 +1582,15 @@ } { # - # perform first the regular operations + # Perform first the regular operations. # next # # Make sure to update update_item_index when the attribute is - # contained in the xowiki_form_instance_item_index + # contained in the xowiki_form_instance_item_index. # set colName [$slot column_name] + if {$colName in { package_id parent_id