diff --git a/src/babashka/main.clj b/src/babashka/main.clj
index c9f5c86b..553bd931 100644
--- a/src/babashka/main.clj
+++ b/src/babashka/main.clj
@@ -217,7 +217,8 @@ Everything after that is bound to *command-line-args*."))
io clojure.java.io
async clojure.core.async
csv clojure.data.csv
- json cheshire.core})
+ json cheshire.core
+ xml clojure.data.xml})
(def namespaces
{'clojure.tools.cli tools-cli-namespace
diff --git a/test/babashka/main_test.clj b/test/babashka/main_test.clj
index 10f92793..bcd4a984 100644
--- a/test/babashka/main_test.clj
+++ b/test/babashka/main_test.clj
@@ -337,7 +337,8 @@
(is (true? (bb nil "(= (first {1 2}) (clojure.lang.MapEntry. 1 2))")))))
(deftest clojure-data-xml-test
- #_(is (= )))
+ (is (= "- 1
- 2
"
+ (bb nil "(let [xml (xml/parse-str \"- 1
- 2
\")] (xml/emit-str xml))"))))
;;;; Scratch