Index: openacs-4/packages/news-aggregator/tcl/source-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/tcl/source-procs-postgresql.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/news-aggregator/tcl/source-procs-postgresql.xql	27 Feb 2005 17:07:20 -0000	1.6
+++ openacs-4/packages/news-aggregator/tcl/source-procs-postgresql.xql	17 Jul 2018 13:28:48 -0000	1.7
@@ -39,24 +39,23 @@
     </querytext>
 </partialquery>
 
-
 <fullquery name="news_aggregator::source::new.add_source">
         <querytext>
             select na_source__new (
-                :source_id,
+                null, -- object_id
                 :feed_url,
-		        :link,
-                :title,
+		:link,
+                :channel_title,
                 :description,
-		        :last_modified,
+		:last_modified,
                 '1',
                 :package_id,
                 :user_id,
                 :creation_ip
             )
         </querytext>
-    </fullquery>
-    
+</fullquery>
+
 <fullquery name="news_aggregator::source::new.add_item_pub_date_now">
     <querytext>
         now()