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.116 -r1.117 --- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 5 Jun 2009 12:20:10 -0000 1.116 +++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 5 Jun 2009 17:48:48 -0000 1.117 @@ -2244,7 +2244,6 @@ # Call a render on the created structure # if {[my set list_mode]} { -my log LIST return [my render_list $pages] } else { return [my render_yui_list -full true $pages] Index: openacs-4/packages/xowiki/tcl/tree-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/tree-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/xowiki/tcl/tree-procs.tcl 29 May 2009 13:37:48 -0000 1.1 +++ openacs-4/packages/xowiki/tcl/tree-procs.tcl 5 Jun 2009 17:48:48 -0000 1.2 @@ -93,11 +93,12 @@ Class TreeNode -superclass ::xo::OrderedComposite -parameter { level label pos {open_requests 0} count {href ""} object owner li_id ul_id ul_class - {prefix ""} {expanded true} {highlight false} + {prefix ""} {expanded false} {highlight false} } TreeNode instproc open_tree {} { my open_requests 1 + my expanded true if {[my exists __parent]} {[my set __parent] open_tree} }