Index: openacs-4/packages/acs-content-repository/tcl/search-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/search-procs.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/acs-content-repository/tcl/search-procs.tcl	23 Feb 2002 21:28:17 -0000	1.7
+++ openacs-4/packages/acs-content-repository/tcl/search-procs.tcl	29 Dec 2008 22:01:28 -0000	1.8
@@ -145,7 +145,7 @@
 } {
 
     set package_id [apm_package_id_from_key search]
-    set driver [ad_parameter -package_id $package_id FtsEngineDriver]
+    set driver [parameter::get -package_id $package_id -parameter FtsEngineDriver]
     array set result [acs_sc_call FtsEngineDriver search [list $q $offset $limit] $driver]
 
     return $result(ids)