Index: openacs-4/packages/acs-tcl/tcl/apm-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-tcl/tcl/apm-procs.xql	29 May 2001 01:46:29 -0000	1.4
+++ openacs-4/packages/acs-tcl/tcl/apm-procs.xql	27 Jul 2002 00:13:17 -0000	1.5
@@ -45,7 +45,7 @@
       <querytext>
 
 	select v.package_id, p.parameter_name, 
-               coalesce(p.default_value, v.attr_value) as attr_value
+               case when v.value_id is null then p.default_value else v.attr_value end as attr_value
 	from apm_parameters p left outer join apm_parameter_values v
              using (parameter_id)
 	where p.package_key = :package_key