Index: openacs-4/packages/acs-templating/www/doc/gen/generate-docs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/www/doc/gen/generate-docs.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/acs-templating/www/doc/gen/generate-docs.tcl	13 Mar 2001 22:59:27 -0000	1.1
+++ openacs-4/packages/acs-templating/www/doc/gen/generate-docs.tcl	27 Oct 2014 16:40:22 -0000	1.2
@@ -45,7 +45,7 @@
 set tcl_lvl [info level]
 set adp_lvl [adp_level]
 set file_list [list]
-set doc_root [get_server_root]/packages/acs-templating/www/doc
+set doc_root $::acs::rootdir/packages/acs-templating/www/doc
 
 #debugging:
 template::util::display_value doc_root
@@ -56,7 +56,7 @@
 set dir [ns_library private]
 
 # debugging
-set svr_root [get_server_root]
+set svr_root $::acs::rootdir
 
 
 set dir [list $svr_root/packages/cms/tcl $svr_root/packages/acs-templating/tcl]