Index: openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl,v
diff -u -r1.147.2.16 -r1.147.2.17
--- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	1 Feb 2021 10:41:29 -0000	1.147.2.16
+++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	14 Feb 2021 21:16:30 -0000	1.147.2.17
@@ -133,7 +133,7 @@
     set :fields $__fields
   }
 
-  proc ::xowiki::locales {} {
+  ad_proc -private ::xowiki::locales {} {
     set locales [lang::system::get_locales]
     if {[ns_conn isconnected]} {
       #
@@ -148,7 +148,7 @@
     return $lpairs
   }
 
-  proc ::xowiki::page_templates {} {
+  ad_proc -private ::xowiki::page_templates {} {
     set form ::xowiki::f1 ;# form has to be named this way for the time being
     #set form [lindex [::xowiki::WikiForm info instances -closure] 0]
     $form instvar folder_id