Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -r1.50 -r1.51
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	9 Sep 2008 12:43:57 -0000	1.50
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	10 Sep 2008 10:19:19 -0000	1.51
@@ -2711,7 +2711,6 @@
 
     my instvar __including_page
     set o $__including_page
-    my log "start render"
     ::xo::Page requireCSS "/resources/acs-templating/lists.css"
     set return_url [::xo::cc url]?[::xo::cc actual_query]
 
@@ -2743,7 +2742,6 @@
                           -form_constraints $form_constraints]
     # $form_item show_fields $form_fields
     foreach f $form_fields {set __ff([$f name]) $f}
-    my log "get form_fields done"
 
     if {[info exists __ff(_creation_user)]} {$__ff(_creation_user) label "By User"}
 
@@ -2819,7 +2817,7 @@
                    -package_id $package_id]
       }
     }
-    my log "queries done"
+    #my log "queries done"
 
     foreach p [$items children] {
       $p set package_id $package_id
@@ -2892,7 +2890,7 @@
       lappend links " <a href='$href'>Generate Voting Form $voting_form</a>"
     }
     append html [join $links ,]
-    my log "render done"
+    #my log "render done"
 
     if {[info exists with_categories]} {
       set category_html [$o include [list categories -count 1 -tree_name $with_categories \
Index: openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl,v
diff -u -r1.44 -r1.45
--- openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl	1 Sep 2008 21:15:35 -0000	1.44
+++ openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl	10 Sep 2008 10:19:19 -0000	1.45
@@ -408,6 +408,12 @@
 	$package_id import_prototype_page news
 	$package_id import_prototype_page weblog-portlet
       }
+      # To iterate over all kind of xowiki packages, we could do
+      # foreach package [concat ::xowiki::Package [::xowiki::Package info subclass]] {
+      #    foreach package_id [$package instances] {
+      #       ...
+      #    }
+      # }
       copy_parameter top_portlet top_includelet
     }
     set v 0.79
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 -r1.272 -r1.273
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	9 Sep 2008 12:46:45 -0000	1.272
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	10 Sep 2008 10:19:19 -0000	1.273
@@ -1893,7 +1893,6 @@
     my log $sql
     set items [::xowiki::FormPage instantiate_objects -sql $sql \
                    -object_class ::xowiki::FormPage]
-    my log nr_items=[$items children]
 
     if {$h_where ne "" && !$use_hstore} {
       set init_vars $wc(vars)