Index: openacs-4/packages/news-aggregator/tcl/news-aggregator-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/tcl/news-aggregator-procs.tcl,v diff -u -r1.6.2.1 -r1.6.2.2 --- openacs-4/packages/news-aggregator/tcl/news-aggregator-procs.tcl 16 Dec 2004 08:44:31 -0000 1.6.2.1 +++ openacs-4/packages/news-aggregator/tcl/news-aggregator-procs.tcl 6 Mar 2005 11:37:59 -0000 1.6.2.2 @@ -218,6 +218,7 @@ } { set header [ns_set create] ns_set put $header "If-Modified-Since" $last_modified + if { [catch { set f [util_httpget_full $feed_url $header] }] } { @@ -279,7 +280,7 @@ } { ns_log Debug "na_update_sources: updating news-aggregator sources" - db_foreach sources { *SQL* } { + db_foreach sources {} { na_update_source $owner_id $source_id $feed_url $last_modified }