Index: openacs-4/packages/xowiki/www/admin/delete-type.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/admin/delete-type.tcl,v
diff -u -N -r1.15.2.1 -r1.15.2.2
--- openacs-4/packages/xowiki/www/admin/delete-type.tcl	8 May 2019 19:59:57 -0000	1.15.2.1
+++ openacs-4/packages/xowiki/www/admin/delete-type.tcl	26 Aug 2020 18:46:08 -0000	1.15.2.2
@@ -5,21 +5,28 @@
   @creation-date Aug 11, 2006
   @cvs-id $Id$
 
-  @param object_type 
+  @param object_type
   @param query
 } -parameter {
   {-object_type ::xowiki::Page}
   {-return_url "."}
 }
 
-set sql [$object_type instance_select_query -with_subtypes 0 -folder_id [::$package_id folder_id]]
+set sql [$object_type instance_select_query \
+             -with_subtypes 0 \
+             -folder_id [::$package_id folder_id]]
 xo::dc foreach retrieve_instances $sql {
   permission::require_write_permission -object_id $item_id
   ::$package_id www-delete -item_id $item_id -name $name
 }
 
-# drop type requires that all pages of all xowiki instances are deleted
-# foreach type [$object_type object_types -subtypes_first true] {$type drop_object_type}
+#
+# Drop type would require that all pages of all xowiki instances are
+# deleted:
+#
+# foreach type [$object_type object_types -subtypes_first true] {
+#   $type drop_object_type
+# }
 
 ad_returnredirect $return_url
 ad_script_abort