use threading macro to tidy consumer.zk/messages

This commit is contained in:
Paul Ingles 2012-05-18 12:28:58 +01:00
parent f9574228db
commit 1fca1666ec

View file

@ -39,7 +39,7 @@
(let [[queue-seq queue-put] (pipe)]
(doseq [[topic streams] (.createMessageStreams consumer (topic-map topics))]
(future (doseq [msg (iterator-seq (.iterator (first streams)))]
(queue-put (assoc (to-clojure msg) :topic topic)))))
(queue-put (-> msg to-clojure (assoc :topic topic))))))
queue-seq))
(defn topics