Index: openacs-4/packages/lars-blogger/tcl/rss-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/rss-procs-postgresql.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/lars-blogger/tcl/rss-procs-postgresql.xql 30 Nov 2002 17:37:17 -0000 1.2
+++ openacs-4/packages/lars-blogger/tcl/rss-procs-postgresql.xql 28 Aug 2003 09:41:55 -0000 1.3
@@ -32,10 +32,36 @@
+
+
+ select entry_id,
+ title,
+ content,
+ entry_date,
+ posted_date,
+ to_char(posted_date, 'YYYY-MM-DD') as posted_date_string,
+ to_char(posted_date, 'HH:MI') as posted_time_string,
+ extract(timezone_hour from now()) as tzoffset_hour,
+ extract(timezone_minute from now()) as tzoffset_minute,
+ to_char(entry_date, 'DD Mon YYYY hh12:MI am') as entry_date_pretty,
+ to_char(entry_date, 'YYYY/MM/') as entry_archive_url
+
+ from pinds_blog_entries e join
+ acs_objects o on (o.object_id = e.entry_id) join
+ users u on (u.user_id = o.creation_user)
+ where e.package_id = :package_id
+ and o.creation_user = :user_id
+ and e.draft_p = 'f'
+ and e.deleted_p = 'f'
+ order by e.entry_date desc, e.posted_date desc
+ limit 10
+
+
+
select coalesce (date_part('epoch',
- max(posted_date::timestamp with time zone)
+ max(posted_date::timestamptz)
),0) as last_update
from pinds_blog_entries
where package_id = :package_id
@@ -44,4 +70,18 @@
+
+
+ select coalesce (date_part('epoch',
+ max(e.posted_date::timestamptz)
+ ),0) as last_update
+ from pinds_blog_entries e join
+ acs_objects o on (o.object_id = e.entry_id)
+ where e.package_id = :package_id
+ and o.creation_user = :user_id
+ and e.draft_p = 'f'
+ and e.deleted_p = 'f'
+
+
+