Index: openacs-4/packages/news-aggregator/news-aggregator.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/news-aggregator.info,v diff -u -r1.13.2.10 -r1.13.2.11 --- openacs-4/packages/news-aggregator/news-aggregator.info 16 Feb 2006 15:59:58 -0000 1.13.2.10 +++ openacs-4/packages/news-aggregator/news-aggregator.info 10 Mar 2006 18:15:28 -0000 1.13.2.11 @@ -8,15 +8,15 @@ f na - - Michael Steigman + Guan Yang + Michael Steigman Read news sources on your website. - 2006-02-16 + 2006-03-10 OpenACS The news aggregator periodically reads a set of news sources, in one of several XML-based formats, finds the new bits, and displays them in reverse-chronological order on a single page. - + Index: openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl,v diff -u -r1.1.1.1.2.6 -r1.1.1.1.2.7 --- openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl 16 Feb 2006 15:59:59 -0000 1.1.1.1.2.6 +++ openacs-4/packages/news-aggregator/tcl/aggregator-procs.tcl 10 Mar 2006 18:15:28 -0000 1.1.1.1.2.7 @@ -161,9 +161,14 @@ # Convert to local time while retrieving entries if { [lang::system::timezone_support_p] } { set utc_offset_raw [lang::system::timezone_utc_offset] - set operation [string index $utc_offset_raw 0] - set hours "[string range $utc_offset_raw 1 end] hours" - set with_utc_offset "$operation '$hours' ::interval" + if { $utc_offset_raw eq 0 } { + # no offset + set with_utc_offset "" + } else { + set operation [string index $utc_offset_raw 0] + set hours "[string range $utc_offset_raw 1 end] hours" + set with_utc_offset "$operation '$hours' ::interval" + } } else { set with_utc_offset "" }