Index: openacs-4/packages/xowiki/tcl/category-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/category-procs.tcl,v diff -u -N -r1.4 -r1.5 --- openacs-4/packages/xowiki/tcl/category-procs.tcl 18 Apr 2006 00:06:14 -0000 1.4 +++ openacs-4/packages/xowiki/tcl/category-procs.tcl 24 Apr 2006 08:24:04 -0000 1.5 @@ -51,10 +51,7 @@ Class Category -superclass ::xo::OrderedComposite -parameter { level label pos category_id {open_requests 0} } - Category instproc destroy {} { - my log -- - next - } + #Category instproc destroy {} {my log --; next} Category instproc openTree {} { my set open_requests 1 if {[my exists __parent]} {[my set __parent] openTree}