Index: openacs-4/packages/xowiki/tcl/package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v
diff -u -N -r1.317 -r1.318
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	9 May 2018 15:33:34 -0000	1.317
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	16 May 2018 15:23:55 -0000	1.318
@@ -1858,7 +1858,7 @@
                                       {-add_revision:boolean true}
                                     } {
     set page ""
-    set fn [get_server_root]/packages/$package_key/www/prototypes/$name.page
+    set fn [acs_root_dir]/packages/$package_key/www/prototypes/$name.page
     #:log "--W check $fn"
     if {[file readable $fn]} {
       # We have the file of the prototype page. We try to create