kaosf/xml-seq-return-seq.clj

Created August 11, 2013 14:31

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/kaosf/6205148.js"></script>
Save kaosf/6205148 to your computer and use it in GitHub Desktop.

Download ZIP

(= (xml-seq x) (seq (xml-seq x)))

Raw

xml-seq-return-seq.clj

(let [[a1 a2 _] (let [x (xml-seq (clojure.xml/parse (clojure.java.io/input-stream (java.net.URI. "https://gist.github.com/kaosf/6205132/raw/17a803a4cd7e816698fde5b30552a77272a2b507/sample.xml"))))] (clojure.data/diff x (seq x)))] (and (nil? a1) (nil? a2)))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment