Index: openacs-4/packages/categories/tcl/categories-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/categories-procs.tcl,v
diff -u -r1.38.2.13 -r1.38.2.14
--- openacs-4/packages/categories/tcl/categories-procs.tcl	8 Sep 2022 15:04:35 -0000	1.38.2.13
+++ openacs-4/packages/categories/tcl/categories-procs.tcl	8 Sep 2022 15:56:46 -0000	1.38.2.14
@@ -620,7 +620,7 @@
     return $context_bar
 }
 
-ad_proc category::pageurl { object_id } {
+ad_proc -private category::pageurl { object_id } {
     Returns the page that displays a category.
     To be used by the AcsObject.PageUrl service contract.