下面的往返生成invaild xml,因为结果没有正确转义,即属性值包含’而不是’.我做错了什么或这是一个错误吗?
(ns xml-test (:require [clojure.xml :as xml]) (:require [clojure.zip :as zip])) (def test-xml "<?xml version="1.0" encoding="UTF-8"?> <main> <item attr=''test''> </item> </main>") (def s (ByteArrayInputStream. (.getBytes test-xml "UTF-8"))) (xml/emit (zip/root (zip/xml-zip (clojure.xml/parse s)))) output: <?xml version='1.0' encoding='UTF-8'?> <main> <item attr=''test''/> </main> nil
我已经快速检查了源代码并且clojure.xml / emit-element(由clojure.xml / emit调用)不会将任何字符编码为XML实体.实际上,它允许直接通过属性值.我想这意味着clojure.xml的可用性非常有限;你应该使用clojure.contrib.lazy-xml.我很抱歉在你关于XML发射的第一个问题的答案中没有提到它,我没有意识到这样的事情会发生.
使用clojure.contrib.lazy-xml,您可以执行以下操作:
user> (lazy-xml/emit (lazy-xml/parse-trim (java.io.StringReader. "<foo bar=\"'""'\"/>"))) <?xml version="1.0" encoding="UTF-8"?><foo bar="'""'"/>
如果你真的想使用clojure.xml,你必须传递clojure.xml / emit并使用你选择的XML生成器.好吧,实际上,你可以使用clojure.xml / parse,修改结果,然后将它传递给clojure.contrib.lazy-xml / emit; XML的Clojure表示结构与两个库相同,但只有后者才能正确发射.