diff options
| author | Chouser <chouser@n01se.net> | 2009-02-25 22:28:46 +0000 |
|---|---|---|
| committer | Chouser <chouser@n01se.net> | 2009-02-25 22:28:46 +0000 |
| commit | 72bda37e4b8d1f7f959cf0a71d1d7383bd3faf0e (patch) | |
| tree | 198f1d48480a5674cfda974b81d6acd5a81afc2a /src/clojure/contrib/lazy_xml.clj | |
| parent | 99b81312b6621c4fb0e8acf546243a4643839393 (diff) | |
lazy-xml: fix incorrect nil pun
Diffstat (limited to 'src/clojure/contrib/lazy_xml.clj')
| -rw-r--r-- | src/clojure/contrib/lazy_xml.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/lazy_xml.clj b/src/clojure/contrib/lazy_xml.clj index f309e5f6..929ce025 100644 --- a/src/clojure/contrib/lazy_xml.clj +++ b/src/clojure/contrib/lazy_xml.clj @@ -143,7 +143,7 @@ (doseq [attr (:attrs e)] (print (str " " (name (key attr)) "='" (escape-xml (val attr)) "'")))) - (if (:content e) + (if (seq (:content e)) (do (print (str ">" pad)) (doseq [c (:content e)] |