Index: openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl,v
diff -u -N -r1.41.2.9 -r1.41.2.10
--- openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl	26 Sep 2019 17:04:01 -0000	1.41.2.9
+++ openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl	29 Nov 2019 15:30:15 -0000	1.41.2.10
@@ -97,7 +97,7 @@
     }
 
     if {$url eq "" && $init_url} {
-      set url [root_of_host [ad_host]][ns_conn url]
+      set url [acs::root_of_host [ad_host]][ns_conn url]
       #:log "--CONN ns_conn url -> $url"
     }
 
@@ -293,7 +293,7 @@
       # in case of host-node map, simplify the url to avoid redirects
       # .... but ad_host works only, when we are connected....
       # TODO: solution for syndication
-      set root [root_of_host [ad_host]]
+      set root [acs::root_of_host [ad_host]]
       regexp "^${root}(.*)$" $package_url _ package_url
     }
     #:log "--R package_url= $package_url (was $info(url))"