Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;<item>
- ; <title>Ohje</title>
- ; <pubDate>Fri, 10 Mar 2006 10:55:20 +0000</pubDate>
- ; <dc:creator>admin</dc:creator>
- ; </item>
- ; <item>
- ; <title>wiki</title>
- ; <pubDate>Fri, 10 Mar 2006 15:12:10 +0000</pubDate>
- ; <dc:creator>admin</dc:creator>
- ;</item>
- (def xml_parsed (xml/parse "dev-resources/gddwnb_s.xml"))
- (def xml_seq (xml-seq xml_parsed))
- (doall (for [x xml_seq
- :when (= :item (:tag x))]
- (first (:content x))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement