USING: rss io.files tools.test ;
IN: temporary

[ T{
    feed
    f
    "Meerkat"
    "http://meerkat.oreillynet.com"
    V{
        T{
            entry
            f
            "XML: A Disruptive Technology"
            "http://c.moreover.com/click/here.pl?r123"
            "\n      XML is placing increasingly heavy loads on the existing technical\n      infrastructure of the Internet.\n    "
            f
        }
    }
} ] [ "extra/rss/rss1.xml" resource-path load-news-file ] unit-test
[ T{
    feed
    f
    "dive into mark"
    "http://example.org/"
    V{
        T{
            entry
            f
            "Atom draft-07 snapshot"
            "http://example.org/2005/04/02/atom"
            "\n         <div xmlns=\"http://www.w3.org/1999/xhtml\">\n           <p><i>[Update: The Atom draft is finished.]</i></p>\n         </div>\n       "

            "2003-12-13T08:29:29-04:00"
        }
    }
} ] [ "extra/rss/atom.xml" resource-path load-news-file ] unit-test
[ " &amp; &amp; hi" ] [ " & &amp; hi" &>&amp; ] unit-test