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.28 -r1.29
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	25 Apr 2008 10:02:49 -0000	1.28
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	25 Apr 2008 11:43:05 -0000	1.29
@@ -506,6 +506,7 @@
       lappend trees [list $tree_id $my_tree_name]
     }
 
+    my msg "[llength $trees] == 0 && $tree_name"
     if {[llength $trees] == 0 && $tree_name ne ""} {
       # we have nothing left from mapped trees, maybe the tree_names are not mapped; 
       # try to get these
@@ -514,7 +515,7 @@
         lappend trees [list [lindex [category_tree::get_id $tree_name] 0] $name]
       }
     }
-    
+    my msg "[llength $trees] == 0 && $tree_name"
     foreach tree $trees {
       foreach {tree_id my_tree_name ...} $tree {break}
       if {!$no_tree_name} {