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.2 -r1.3
--- openacs-4/packages/faq/www/admin/faq-delete.tcl	28 Nov 2003 16:55:15 -0000	1.2
+++ openacs-4/packages/faq/www/admin/faq-delete.tcl	12 Aug 2004 13:57:43 -0000	1.3
@@ -2,7 +2,7 @@
 
 ad_page_contract {
     
-    delete an FAQ
+    delete an FAQ, also deletes entries in acs_named_objects for categories
     @author Elizabeth Wirth (wirth@ybos.net)
     @author Jennie Housman (jennie@ybos.net)
     @creation-date 2000-10-24
@@ -24,6 +24,7 @@
 	        );
 	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)"
 }
 
 ad_returnredirect "index"
\ No newline at end of file