Index: openacs-4/packages/categories/tcl/category-trees-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/category-trees-procs.tcl,v
diff -u -r1.31.2.3 -r1.31.2.4
--- openacs-4/packages/categories/tcl/category-trees-procs.tcl	15 Mar 2019 10:39:02 -0000	1.31.2.3
+++ openacs-4/packages/categories/tcl/category-trees-procs.tcl	26 Apr 2019 12:31:22 -0000	1.31.2.4
@@ -20,8 +20,11 @@
         @return array: tree_name description site_wide_p
         @author Timo Hentschel (timo@timohentschel.de)
     } {
-        db_1row get_tree_data "" -column_array tree
-
+        set tree(site_wide_p) [db_string get_site_wide_p {
+	    select site_wide_p
+	    from category_trees
+	    where tree_id = :tree_id
+        }]
         lassign [get_translation $tree_id $locale] tree(tree_name) tree(description)
         return [array get tree]
     }
Index: openacs-4/packages/categories/tcl/category-trees-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/Attic/category-trees-procs.xql,v
diff -u -r1.11.2.1 -r1.11.2.2
--- openacs-4/packages/categories/tcl/category-trees-procs.xql	15 Feb 2019 18:18:00 -0000	1.11.2.1
+++ openacs-4/packages/categories/tcl/category-trees-procs.xql	26 Apr 2019 12:31:22 -0000	1.11.2.2
@@ -1,16 +1,6 @@
 <?xml version="1.0"?>
 <queryset>
 
-<fullquery name="category_tree::get_data.get_tree_data">      
-      <querytext>
-      
-	    select site_wide_p
-	    from category_trees
-	    where tree_id = :tree_id
-	
-      </querytext>
-</fullquery>
-
 <fullquery name="category_tree::edit_mapping.edit_mapping">
       <querytext>