Index: openacs.org-dev/packages/acs-tcl/tcl/defs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-tcl/tcl/defs-procs.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/acs-tcl/tcl/defs-procs.tcl	9 Jul 2002 17:34:59 -0000	1.1.1.1
+++ openacs.org-dev/packages/acs-tcl/tcl/defs-procs.tcl	5 Aug 2002 21:38:25 -0000	1.1.1.2
@@ -489,16 +489,13 @@
     if {[info exists set]} {
 	set ns_param [parameter::set_value -package_id $package_id -parameter $name -value $set]
     } else {
-        set ns_param [ad_parameter_from_file $name $package_key]
-	if {[empty_string_p $ns_param]} {
-            set ns_param [parameter::get -package_id $package_id -parameter $name -default $default]
-	}
+        set ns_param [parameter::get -package_id $package_id -parameter $name -default $default]
     }
 
     return $ns_param
 }
 
-ad_proc -deprecated ad_parameter_from_file {
+ad_proc -public ad_parameter_from_file {
     name
     {package_key ""}
 } {