Index: openacs-4/packages/acs-templating/tcl/parse-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/parse-procs.tcl,v diff -u -r1.65.2.6 -r1.65.2.7 --- openacs-4/packages/acs-templating/tcl/parse-procs.tcl 3 Jul 2020 07:27:29 -0000 1.65.2.6 +++ openacs-4/packages/acs-templating/tcl/parse-procs.tcl 28 Oct 2020 15:39:19 -0000 1.65.2.7 @@ -129,7 +129,7 @@ set templated_p 1 } - if { [info commands ::ds_page_fragment_cache_enabled_p] ne "" + if { [namespace which ::ds_page_fragment_cache_enabled_p] ne "" && [::ds_enabled_p] && [::ds_page_fragment_cache_enabled_p] && [::ds_collection_enabled_p] } { @@ -147,7 +147,7 @@ template::code::${template_extension}::$__adp_stub # JCD: Lets keep a copy of all the page fragments! WooHoo. - if { [info commands ::ds_page_fragment_cache_enabled_p] ne "" + if { [namespace which ::ds_page_fragment_cache_enabled_p] ne "" && [::ds_enabled_p] && [::ds_page_fragment_cache_enabled_p] && [::ds_collection_enabled_p] } { @@ -374,7 +374,7 @@ to the .adp or .tcl file to source. } { # this will return the name of the proc if it exists - set proc_name [info commands ::template::mtimes::${type}::$file_stub] + set proc_name [namespace which ::template::mtimes::${type}::$file_stub] set pkg_id [apm_package_id_from_key acs-templating] set refresh_cache [parameter::get -package_id $pkg_id -parameter RefreshCache -default "as needed"] @@ -404,7 +404,7 @@ # Here we add profiling calls if developer support exists on the # system. - if {[info commands ::ds_enabled_p] ne ""} { + if {[namespace which ::ds_enabled_p] ne ""} { proc ::template::code::${type}::$file_stub {} "if {\[::ds_enabled_p\] && \[::ds_collection_enabled_p\] && \[::ds_profiling_enabled_p\]} { ds_profile start $file_stub.$type } uplevel { $code