Index: openacs-4/packages/search/lib/navbar.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/search/lib/navbar.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/search/lib/navbar.tcl 5 Jan 2008 18:35:45 -0000 1.3 +++ openacs-4/packages/search/lib/navbar.tcl 13 Feb 2009 21:26:43 -0000 1.4 @@ -1,7 +1,7 @@ set package_id [ad_conn package_id] -set limit [ad_parameter -package_id $package_id LimitDefault] -set pages_per_group [ad_parameter -package_id $package_id PagesPerGroup] +set limit [parameter::get -package_id $package_id -parameter LimitDefault] +set pages_per_group [parameter::get -package_id $package_id -parameter PagesPerGroup] set current_result_page [expr {$low / $limit}] set from_result_page [expr {($current_result_page / $pages_per_group) * $pages_per_group}]