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 -N -r1.5 -r1.6
--- openacs-4/packages/faq/www/admin/faq-delete.tcl	19 Jan 2018 14:44:17 -0000	1.5
+++ openacs-4/packages/faq/www/admin/faq-delete.tcl	30 Jan 2019 12:15:18 -0000	1.6
@@ -16,16 +16,7 @@
 
 permission::require_permission -object_id  $package_id -privilege faq_delete_faq
 
-db_transaction {
-    db_exec_plsql delete_faq {
-	begin
-	   faq.delete_faq (
-		    faq_id => :faq_id
-	        );
-	end;
-    }
-    db_dml delete_named_object "delete from acs_named_objects where object_id in (select entry_id from faq_q_and_as where faq_id = :faq_id)"
-}
+db_dml delete_faq {delete from faqs where faq_id = :faq_id}
 
 ad_returnredirect "index"
 ad_script_abort