Index: openacs-4/packages/feed-parser/tcl/feed-parser-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/feed-parser/tcl/feed-parser-procs.tcl,v diff -u -N -r1.8 -r1.9 --- openacs-4/packages/feed-parser/tcl/feed-parser-procs.tcl 25 Apr 2018 19:47:47 -0000 1.8 +++ openacs-4/packages/feed-parser/tcl/feed-parser-procs.tcl 9 May 2018 15:33:31 -0000 1.9 @@ -29,7 +29,7 @@ } { @author Simon Carstensen } { - set sorted {} + set sorted [list] for {set i 0} {$i < [llength $result]} {incr i} { lappend sorted [lindex $result end-$i] } @@ -330,7 +330,7 @@ set item_nodes [feed_parser::items_fetch -doc_node $doc_node] set item_nodes [feed_parser::sort_result -result $item_nodes] - set items {} + set items [list] foreach item_node $item_nodes { lappend items [feed_parser::item_parse -item_node $item_node]