Index: openacs-4/packages/rss-support/www/admin/subscrs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/www/admin/subscrs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/rss-support/www/admin/subscrs.tcl	19 Nov 2001 04:02:28 -0000	1.1
+++ openacs-4/packages/rss-support/www/admin/subscrs.tcl	30 Nov 2001 05:56:37 -0000	1.2
@@ -1,10 +1,20 @@
 db_multirow subscrs get_subscrs {
     select s.subscr_id,
            s.timeout,
-           person__name(o.creation_user) as creator
+           person__name(o.creation_user) as creator,
+           coalesce(to_char(s.lastbuild,'YYYY-MM-DD HH24:MI:SS'),'never built') as lastbuild,
+           s.last_ttb,
+           s.channel_title,
+           s.channel_link
     from rss_gen_subscrs s,
          acs_objects o
     where o.object_id = s.subscr_id
+} {
+    if [string equal $channel_title ""] {
+	set channel_title "Subscription #$subscr_id"
+    }
 }
 
-set context_bar [ad_context_bar Subscriptions]
\ No newline at end of file
+set context_bar [ad_context_bar Subscriptions]
+
+set enc_url [ad_urlencode [ad_conn url]?[ad_conn query]]
\ No newline at end of file