Index: openacs-4/packages/assessment/tcl/as-install-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-install-procs.tcl,v diff -u -r1.35.2.2 -r1.35.2.3 --- openacs-4/packages/assessment/tcl/as-install-procs.tcl 7 Apr 2007 23:27:14 -0000 1.35.2.2 +++ openacs-4/packages/assessment/tcl/as-install-procs.tcl 8 Apr 2007 17:16:03 -0000 1.35.2.3 @@ -448,8 +448,12 @@ # delete actions db_foreach get_package_actions {} { ns_log notice "delte action $object_id" - db_exec_plsql delete_action {} + package_exec_plsql -var_list [list [list action_id $object_id]] \ + as_action del } + foreach folder_id [db_list get_folders ""] { + content::folder::delete -folder_id $folder_id -cascade_p t + } } ad_proc -public as::install::before_unmount {