Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v
diff -u -r1.205 -r1.206
--- openacs-4/packages/new-portal/tcl/portal-procs.tcl	22 May 2018 07:32:49 -0000	1.205
+++ openacs-4/packages/new-portal/tcl/portal-procs.tcl	22 May 2018 10:06:59 -0000	1.206
@@ -99,11 +99,13 @@
    return $::portal::www_path
 }
 
-set ::portal::mount_point [site_node::get_url_from_object_id \
-                               -object_id $::portal::get_package_id]
 ad_proc -public portal::mount_point {} {
     caches the mount point
 } {
+    if {![info exists ::portal::mount_point]} {
+        set ::portal::mount_point [site_node::get_url_from_object_id \
+                                       -object_id $::portal::get_package_id]
+    }    
     return $::portal::mount_point
 }