Index: openacs-4/packages/news-aggregator/tcl/source-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/tcl/source-procs.tcl,v diff -u -r1.17 -r1.18 --- openacs-4/packages/news-aggregator/tcl/source-procs.tcl 19 Jul 2018 15:36:42 -0000 1.17 +++ openacs-4/packages/news-aggregator/tcl/source-procs.tcl 2 Apr 2019 09:40:30 -0000 1.18 @@ -187,6 +187,9 @@ set description [dict get $item description] set author [dict get $item author] set pub_date [dict get $item pub_date] + if { $pub_date ne "" } { + set pub_date [clock format $pub_date -format "%Y-%m-%d %T UTC"] + } set guid [news_aggregator::source::generate_guid \ -link [dict get $item link] \ @@ -213,10 +216,6 @@ ns_log Debug "source::update: guid $guid is new and will be inserted; title=$title description=$description" } - if { $pub_date ne "" } { - set pub_date [clock format $pub_date -format "%Y-%m-%d %T UTC"] - } - db_exec_plsql add_item {} incr no_items } else {