Index: openacs-4/packages/xowiki/tcl/folder-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/folder-procs.tcl,v diff -u -r1.18 -r1.19 --- openacs-4/packages/xowiki/tcl/folder-procs.tcl 16 Nov 2012 08:56:19 -0000 1.18 +++ openacs-4/packages/xowiki/tcl/folder-procs.tcl 21 Dec 2012 11:20:35 -0000 1.19 @@ -152,7 +152,7 @@ my instvar current_folder current_folder_id folder_form_id link_form_id my get_parameters - set with_links 0 + set with_links 1 set page [my set __including_page] set package_id [::xo::cc package_id] @@ -407,6 +407,7 @@ if {[info command ::__xowiki__MenuBar] ne "" && [::__xowiki__MenuBar exists submenu_pages(folder)]} { set owner [::__xowiki__MenuBar set submenu_owner(folder)] + my msg "owner $owner [$owner name], book-mode [$owner set book_mode], pages [::__xowiki__MenuBar set submenu_pages(folder)]" $subnode add_pages -full true \ -book_mode [$owner set book_mode] \ -owner $owner \