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.22 -r1.23 --- openacs-4/packages/xowiki/tcl/category-procs.tcl 15 Jul 2010 23:55:31 -0000 1.22 +++ openacs-4/packages/xowiki/tcl/category-procs.tcl 11 Mar 2011 17:49:48 -0000 1.23 @@ -62,7 +62,8 @@ # provide a common interface to older versions of categories # # provide compatibility with earlier versions of categories - set have_locale [expr {[lsearch [info args category_tree::get_tree] locale] > -1}] + #set have_locale [expr {[lsearch [info args category_tree::get_tree] locale] > -1}] + set have_locale 1 set all_arg [expr {$all ? "-all" : ""}] return [expr {$have_locale ? [eval category_tree::get_tree $all_arg -subtree_id [list $subtree_id] $tree_id $locale] : Index: openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl,v diff -u -N -r1.32 -r1.33 --- openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl 14 Jan 2011 10:36:21 -0000 1.32 +++ openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl 11 Mar 2011 17:49:48 -0000 1.33 @@ -47,7 +47,7 @@ } #::xowiki::notification::do_notifications -page $page -html $(html) -text $text - ns_log notice "--sc INDEXING $revision_id -> $text keywords $(keywords)" + #ns_log notice "--sc INDEXING $revision_id -> $text keywords $(keywords)" #$page set unresolved_references 0 $page instvar item_id # cleanup old stuff. This might run into an error, when search is not Index: openacs-4/packages/xowiki/www/index.vuh =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/index.vuh,v diff -u -N -r1.6 -r1.7 --- openacs-4/packages/xowiki/www/index.vuh 14 Jan 2010 10:44:09 -0000 1.6 +++ openacs-4/packages/xowiki/www/index.vuh 11 Mar 2011 17:49:48 -0000 1.7 @@ -1,4 +1,5 @@ # -*- tcl -*- +::nsf::__profile_clear ::xowiki::Package initialize -ad_doc { This is the resolver for this package. It turns a request into @@ -22,4 +23,5 @@ ::$package_id reply_to_user [::$package_id invoke -method $m] ::$package_id log "--i ::$package_id DONE" +source [file dirname [info script]]/../www/profile-show.tcl ad_script_abort