Index: openacs-4/packages/acs-templating/tcl/util-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/util-procs.tcl,v diff -u -N -r1.28.2.4 -r1.28.2.5 --- openacs-4/packages/acs-templating/tcl/util-procs.tcl 10 Sep 2015 08:22:08 -0000 1.28.2.4 +++ openacs-4/packages/acs-templating/tcl/util-procs.tcl 12 Sep 2015 16:47:24 -0000 1.28.2.5 @@ -809,6 +809,20 @@ return $path } +ad_proc -public template::streaming_template { + -subsite_id +} { + Return the path of the streaming template + @param subsite_id id of the subsite. Defaults to [ad_conn subsite_id] + @return path to themed template +} { + if { ![info exists subsite_id] } { + set subsite_id [ad_conn subsite_id] + } + set template [parameter::get -package_id $subsite_id -parameter StreamingHead] + return [template::resource_path -type master -style $template -relative] +} + ad_proc -public template::resource_path { -type:required -style:required