Index: openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl,v
diff -u -r1.105 -r1.106
--- openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl	1 Apr 2010 23:21:01 -0000	1.105
+++ openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl	17 Oct 2010 21:06:09 -0000	1.106
@@ -987,6 +987,18 @@
     return $version_id
 }
 
+ad_proc apm_unregister_disinherited_params { package_key dependency_id } {
+
+    Remove parameters for package_key that have been disinherited (i.e., the
+    dependency that caused them to be inherited have been removed).  Called only
+    by the APM and keep it that way, please.
+
+} {
+    foreach parameter_id [db_list get_parameter_ids {}] {
+        apm_parameter_unregister $parameter_id
+    }
+}
+
 ad_proc apm_copy_param_to_descendents { new_package_key parameter_name } {
     Copy a new parameter in a package to its descendents.  Called when a package is
     upgraded or a parameter added in the APM.