Index: openacs-4/packages/static-pages/www/admin/fs-scan-progress.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/www/admin/fs-scan-progress.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/static-pages/www/admin/fs-scan-progress.tcl	16 Jan 2003 14:03:04 -0000	1.3
+++ openacs-4/packages/static-pages/www/admin/fs-scan-progress.tcl	12 Sep 2013 20:43:19 -0000	1.4
@@ -48,7 +48,7 @@
 
 set package_id [ad_conn package_id]
 set root_folder_id [sp_root_folder_id $package_id]
-set fs_root "[acs_root_dir][ad_parameter -package_id $package_id {fs_root}]"
+set fs_root "[acs_root_dir][parameter::get -package_id $package_id -parameter {fs_root}]"
 
 ns_write "
 <p>