(defn startparse-sax [s ch]
(-> (SAXParserFactory/newInstance)
(doto
(.setValidating false)
(.setFeature "http://xml.org/sax/features/external-general-entities" false)
(.setFeature "http://xml.org/sax/features/external-parameter-entities" false))
.newSAXParser
(doto
(.setProperty "http://xml.org/sax/properties/lexical-handler" ch))
(.parse s ch)))
Comments top
No comments for startparse-sax. Log in to add a comment.