Index: openacs-4/packages/news-aggregator/tcl/source-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/tcl/Attic/source-procs.xql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/news-aggregator/tcl/source-procs.xql 20 Mar 2004 11:04:39 -0000 1.1 +++ openacs-4/packages/news-aggregator/tcl/source-procs.xql 20 Mar 2004 14:06:45 -0000 1.2 @@ -2,6 +2,25 @@ + + + select guid, original_guid, i.title, i.description + from na_items i join + na_sources s on (i.source_id = s.source_id) + where s.feed_url = :feed_url + and guid in ($guids) + order by i.item_id asc + + + + + + + select count(*) + from na_sources + + + select source_id