Index: openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl,v
diff -u -r1.31 -r1.32
--- openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	7 Jun 2008 20:28:48 -0000	1.31
+++ openacs-4/packages/acs-content-repository/tcl/filter-procs.tcl	29 Dec 2008 22:01:28 -0000	1.32
@@ -34,14 +34,14 @@
     # Look for package-defined root
     set package_id [ad_conn package_id]
     set template_root \
-        [ad_parameter -package_id $package_id TemplateRoot dummy ""]
+        [parameter::get -package_id $package_id -parameter TemplateRoot -default ""]
 
     if { $template_root eq "" } {
         # Look for template root defined in the CR
         set package_id [apm_package_id_from_key "acs-content-repository"]
 
-        set template_root [ad_parameter -package_id $package_id \
-                               TemplateRoot dummy "templates"]
+        set template_root [parameter::get -package_id $package_id \
+                               -parameter TemplateRoot -default "templates"]
     }
 
     if { [string index $template_root 0] ne "/" } {