Index: openacs-4/packages/rss-support/www/delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/www/delete.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/rss-support/www/delete.tcl	30 Jan 2003 16:52:12 -0000	1.4
+++ openacs-4/packages/rss-support/www/delete.tcl	17 May 2003 11:23:29 -0000	1.5
@@ -7,13 +7,7 @@
 
 ad_require_permission $subscr_id admin
 
-db_1row subscr_info {
-    select summary_context_id,
-           channel_title,
-           channel_link
-    from rss_gen_subscrs
-    where subscr_id = :subscr_id
-}
+db_1row subscr_info {}
 
 if [string equal $channel_title ""] {
     set channel_title "Summary Context $summary_context_id"
@@ -23,7 +17,7 @@
 
 if [file exists [rss_gen_report_file -subscr_id $subscr_id]] {
     set offer_file 1
-    set report_url [rss_gen_report_file -subscr_id $subscr_id -url]
+    set report_url [rss_gen_report_file -subscr_id $subscr_id]
 } else {
     set offer_file 0
-}
\ No newline at end of file
+}