Index: openacs-4/packages/lars-blogger/sql/oracle/lars-blogger-package-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/sql/oracle/lars-blogger-package-create.sql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/lars-blogger/sql/oracle/lars-blogger-package-create.sql	31 Oct 2003 14:12:55 -0000	1.5
+++ openacs-4/packages/lars-blogger/sql/oracle/lars-blogger-package-create.sql	8 Dec 2003 05:15:04 -0000	1.6
@@ -96,6 +96,11 @@
     )
     is
     begin
+        -- delete comments associated with this entry
+		for comment in (select comment_id from general_comments 
+					      where object_id = pinds_blog_entry.del.entry_id) loop
+			acs_message.del(comment.comment_id);
+		end loop;
 
         delete
         from pinds_blog_entries
@@ -190,6 +195,11 @@
     )
     is
     begin
+        -- delete rss_gen_subscrs which relate to this channel
+		for subscr in (select subscr_id from rss_gen_subscrs
+		      where summary_context_id = weblogger_channel.del.channel_id) loop
+			rss_gen_subscr.del(subscr.subscr_id);
+		end loop;
 
         delete
         from weblogger_channels
