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.13 -r1.14
--- openacs-4/packages/feed-parser/tcl/feed-parser-procs.tcl	1 Apr 2019 13:19:00 -0000	1.13
+++ openacs-4/packages/feed-parser/tcl/feed-parser-procs.tcl	23 Feb 2021 09:35:07 -0000	1.14
@@ -249,7 +249,7 @@
                 first glance not to be an XML document, treat it as an HTML
                 document and attempt to extract an RSS autodiscovery element.
                 If such an element is found, the URL will be retrieved using
-                ad_httpget and this procedure will be applied to the content
+                HTTP GET and this procedure will be applied to the content
                 of that URL.
     @return A Tcl array-list data structure.
 } {
@@ -289,8 +289,8 @@
         if { [llength $link_nodes] == 1} {
             set link_node [lindex $link_nodes 0]
             set feed_url [lindex $link_node 1]
-            array set f [ad_httpget -url $feed_url]
-            return [feed_parser::parse_feed -xml $f(page)]
+            set r [util::http::get -url $feed_url]
+            return [feed_parser::parse_feed -xml [dict get $r page]]
         }
 
         set result(status) "error"