Monday, November 08, 2010 at 12:07 AM.
system.verbs.builtins.xml.rss.formatDrivers.redirect.compile
on compile (adrservice, flSaveData, adrStoryArrivedCallback) {
<<Changes
<<10/20/02; 9:07:01 AM by DW
<<Created. Handle a <redirect> element, per the specification:
<<http://backend.userland.com/redirectRss
local (adrxstruct = @adrservice^.xmlstruct);
local (adrredirect = xml.getAddress (adrxstruct, "redirect"));
local (redirecturl = xml.getValue (adrredirect, "newLocation"));
adrservice^.urlChanged = redirecturl;
return (true)}
<<bundle //test code
<<local (url = "http://127.0.0.1/test/hell.xml")
<<xml.aggregator.readservice (url, @aggregatorData.services)
<<
<<local (adrservice = xml.rss.initService (url, @aggregatorData.services))
<<adrservice^.xmltext = tcp.httpReadUrl (url)
<<xml.compile (adrservice^.xmltext, @adrservice^.xmlstruct)
<<compile (adrservice, true, @xml.aggregator.storyArrivedCallback)
This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.