Index: openacs-4/packages/lars-blogger/www/admin/rss-setup.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/admin/rss-setup.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/lars-blogger/www/admin/rss-setup.tcl	30 Jan 2003 16:56:39 -0000	1.1
+++ openacs-4/packages/lars-blogger/www/admin/rss-setup.tcl	28 Aug 2003 09:41:56 -0000	1.2
@@ -2,23 +2,7 @@
     Setup an RSS feed for this blogger.
 }
 
-set creation_user [ad_conn user_id]
-set creation_ip [ns_conn peeraddr]
+# Setup instance feed if needed
+lars_blog_setup_feed
 
-# by default, we timout in 30 minutes
-set timeout [expr 30*60]
-
-set package_id [ad_conn package_id]
-
-set channel_title [lars_blog_name]
-set channel_link [lars_blog_public_package_url]
-
-db_transaction {
-
-    set subscr_id [db_string create_subscr {}]
-    
-    db_dml update_subscr {}
-
-}
-
-ad_returnredirect .
\ No newline at end of file
+ad_returnredirect .