Index: openacs-4/packages/acs-tcl/tcl/apm-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.tcl,v diff -u -r1.16 -r1.17 --- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 28 Nov 2001 21:32:52 -0000 1.16 +++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 7 May 2002 22:06:09 -0000 1.17 @@ -845,14 +845,12 @@ ad_proc -public apm_package_instance_new { - { - -package_id 0 - } - instance_name context_id package_key + {-package_id 0} + instance_name + context_id + package_key } { - Creates a new instance of a package. - } { if {$package_id == 0} { set package_id [db_null] @@ -884,7 +882,15 @@ return $package_id } +ad_proc -public apm_package_instance_delete { + package_id +} { + Deletes an instance of a package +} { + db_exec_plsql apm_package_instance_delete {} +} + ad_proc apm_parameter_sync {package_key package_id} { Syncs the parameters in the database with the memory cache. This must be called