Index: openacs-4/packages/lars-blogger/tcl/entry-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/entry-procs.tcl,v
diff -u -N -r1.21 -r1.22
--- openacs-4/packages/lars-blogger/tcl/entry-procs.tcl	27 Feb 2004 18:59:52 -0000	1.21
+++ openacs-4/packages/lars-blogger/tcl/entry-procs.tcl	17 May 2004 15:15:19 -0000	1.22
@@ -73,6 +73,9 @@
     # Is this a publish?
     if { [template::util::is_true $draft_p] && ![template::util::is_true $entry(draft_p)] } {
 	lars_blogger::entry::publish -entry_id $entry_id -package_id $entry(package_id)
+    } else {
+        # Update instance/user feeds if needed
+        lars_blog_setup_feed -package_id $entry(package_id)
     }
     
     lars_blog_flush_cache $entry(package_id)