From 72336027585b54254ddc17ad9c90541e2a09c789 Mon Sep 17 00:00:00 2001
From: Chouser <chouser@n01se.net>
Date: Thu, 9 Apr 2009 03:59:58 +0000
Subject: lazy-xml: fix laziness

---
 src/clojure/contrib/lazy_xml.clj | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/clojure/contrib/lazy_xml.clj')

diff --git a/src/clojure/contrib/lazy_xml.clj b/src/clojure/contrib/lazy_xml.clj
index 929ce025..72b6c5a5 100644
--- a/src/clojure/contrib/lazy_xml.clj
+++ b/src/clojure/contrib/lazy_xml.clj
@@ -101,9 +101,10 @@
   [[elem & events]]
     (lazy-seq
       (let [sibs (siblings events)]
+        ;(prn :elem elem)
         (cons
           (struct element (:name elem) (:attrs elem) (drop-last sibs))
-          (last sibs)))))
+          (lazy-seq (last sibs))))))
 
 (defn parse-trim
   "Parses the source s, which can be a File, InputStream or String
-- 
cgit v1.2.3-18-g5258