Index: openacs-4/packages/faq/www/admin/faq-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq/www/admin/faq-delete.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/faq/www/admin/faq-delete.tcl	30 Jan 2019 12:15:18 -0000	1.6
+++ openacs-4/packages/faq/www/admin/faq-delete.tcl	31 Jan 2019 08:49:26 -0000	1.7
@@ -16,7 +16,10 @@
 
 permission::require_permission -object_id  $package_id -privilege faq_delete_faq
 
-db_dml delete_faq {delete from faqs where faq_id = :faq_id}
+db_dml delete_faq {
+    delete from acs_objects where object_id =
+    (select faq_id from faqs where faq_id = :faq_id)
+}
 
 ad_returnredirect "index"
 ad_script_abort
Index: openacs-4/packages/faq/www/admin/q_and_a-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq/www/admin/q_and_a-delete.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/faq/www/admin/q_and_a-delete.tcl	30 Jan 2019 12:17:54 -0000	1.7
+++ openacs-4/packages/faq/www/admin/q_and_a-delete.tcl	31 Jan 2019 08:49:26 -0000	1.8
@@ -16,7 +16,10 @@
 
 db_1row get_faq_id "select faq_id from faq_q_and_as where entry_id=:entry_id"
 
-db_dml delete_entry {delete from faq_q_and_as where entry_id = :entry_id}
+db_dml delete_entry {
+    delete from acs_objects where object_id =
+    (select entry_id from faq_q_and_as where entry_id = :entry_id)
+}
 
 ad_returnredirect "one-faq?faq_id=$faq_id"
 ad_script_abort