Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v diff -u -r1.368.2.11 -r1.368.2.12 --- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 9 Apr 2019 12:59:09 -0000 1.368.2.11 +++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 9 Apr 2019 15:55:06 -0000 1.368.2.12 @@ -479,7 +479,7 @@ This web-callable method deletes a single revision of a Page, which is actually performed by the "delete_revision" method of the - package, which is reponsible for caching. + package, which is responsible for caching. Since we instantiate the Page based on the "revision_id" query parameter, it is sufficient to delete here just based on the @@ -2460,8 +2460,7 @@ set leaf_components {} set container_fields {} foreach f $form_fields { - #set f [:lookup_form_field -name $c $form_fields] - if {[$f info methods leaf_components] ne ""} { + if {[$f istype ::xowiki::formfield::CompoundField]} { #ns_log notice "TOP call leaf_components for [$f info class]" lappend leaf_components {*}[$f leaf_components] lappend container_fields $f