Index: openacs-4/packages/rss-support/www/subscrs-include-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/www/Attic/subscrs-include-oracle.xql,v diff -u -N --- openacs-4/packages/rss-support/www/subscrs-include-oracle.xql 23 Feb 2005 12:33:21 -0000 1.4 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,22 +0,0 @@ - - - - oracle8.1.6 - - - - select s.subscr_id, - s.timeout, - person.name(o.creation_user) as creator, - to_char(s.lastbuild,'YYYY-MM-DD HH24:MI:SS') as lastbuild_ansi, - s.last_ttb, - s.channel_title, - s.channel_link - from rss_gen_subscrs s, - acs_objects o - where o.object_id = s.subscr_id $maybe_restrict_to_user - order by s.last_ttb desc - - - - Index: openacs-4/packages/rss-support/www/subscrs-include-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/www/Attic/subscrs-include-postgresql.xql,v diff -u -N --- openacs-4/packages/rss-support/www/subscrs-include-postgresql.xql 23 Feb 2005 12:33:22 -0000 1.4 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,22 +0,0 @@ - - - - postgresql7.1 - - - - select s.subscr_id, - s.timeout, - person__name(o.creation_user) as creator, - to_char(s.lastbuild,'YYYY-MM-DD HH24:MI:SS') as lastbuild_ansi, - s.last_ttb, - s.channel_title, - s.channel_link - from rss_gen_subscrs s, - acs_objects o - where o.object_id = s.subscr_id $maybe_restrict_to_user - order by s.last_ttb desc - - - - Index: openacs-4/packages/rss-support/www/subscrs-include.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/www/subscrs-include.tcl,v diff -u -N -r1.7 -r1.8 --- openacs-4/packages/rss-support/www/subscrs-include.tcl 7 Aug 2017 23:48:29 -0000 1.7 +++ openacs-4/packages/rss-support/www/subscrs-include.tcl 15 Jun 2018 21:04:58 -0000 1.8 @@ -4,7 +4,20 @@ set maybe_restrict_to_user "" } -db_multirow -extend { lastbuild_pretty } subscrs get_subscrs {} { +db_multirow -extend { lastbuild_pretty } subscrs get_subscrs [subst { + select s.subscr_id, + s.timeout, + o.creation_user as creator, + to_char(s.lastbuild,'YYYY-MM-DD HH24:MI:SS') as lastbuild_ansi, + s.last_ttb, + s.channel_title, + s.channel_link + from rss_gen_subscrs s, + acs_objects o + where o.object_id = s.subscr_id $maybe_restrict_to_user + order by s.last_ttb desc +}] { + set creator [acs_user::get -user_id $creator -element name] if {$lastbuild_ansi ne ""} { set lastbuild_ansi [lc_time_system_to_conn $lastbuild_ansi] set lastbuild_pretty [lc_time_fmt $lastbuild_ansi "%x %X"]