DXML-35 print newline after preamble

Author: bendlas

CHANGES.md

@@ -1,5 +1,6 @@
 From 0.2.0-alpha2 to 0.2.0-alpha3
 - Minimum requirement is now clojure 1.7.0
+- Print newline after preamble when pretty-printing (DXML-35)
 
 From 0.2.0-alpha1 to 0.2.0-alpha2
 - qname function now returns canonical (keyword) names

src/main/clojure/clojure/data/xml/jvm/pprint.clj

@@ -16,7 +16,9 @@
   (doto (-> (TransformerFactory/newInstance) .newTransformer)
     (.setOutputProperty (OutputKeys/INDENT) "yes")
     (.setOutputProperty (OutputKeys/METHOD) "xml")
-    (.setOutputProperty "{http://xml.apache.org/xslt}indent-amount" "2")))
+    (.setOutputProperty "{http://xml.apache.org/xslt}indent-amount" "2")
+    ;; print newline after preamble https://bugs.openjdk.java.net/browse/JDK-7150637
+    (.setOutputProperty "http://www.oracle.com/xml/is-standalone" "yes")))
 
 (defn indent-xml
   [xml-str ^Writer writer]

src/test/clojure/clojure/data/xml/test_pprint.clj

@@ -16,14 +16,10 @@
 (def xml
   "<foo><bar/></foo>")
 
-(defn jdk8? []
-  (-> (System/getProperty "java.version")
-      (.startsWith "1.8")))
-
 (def indented-xml
   (str
    "<?xml version=\"1.0\" encoding=\"UTF-8\"?>"
-   (when-not (jdk8?) "\n")
+   "\n"
    "<foo>
   <bar/>
 </foo>