Skip to content

Instantly share code, notes, and snippets.

@tomjack tomjack/scratch.clj Secret
Created Aug 24, 2011

Embed
What would you like to do?
(->> response
client/string
(mapcat (partial re-seq #".+\r\n"))
(map (comp f json/read-json))
doall)
(let [records (->> response
client/string
(mapcat (partial re-seq #".+\r\n"))
(map json/read-json))]
(doseq [record records]
(f record)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.