Skip to content

Instantly share code, notes, and snippets.

@mattdeboard

mattdeboard/gist:ff80a5509a5241065a98 Secret

Created February 29, 2012 21:43
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mattdeboard/ff80a5509a5241065a98 to your computer and use it in GitHub Desktop.
Save mattdeboard/ff80a5509a5241065a98 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
(let [tags (element :add {}
(for [jj test-job]
(let [job (merge jj (job-buid jj))]
(element :doc {}
(element :field {:name "buid"} (str (:buid_id job)))
(element :field {:name "city"} (:city job))
(element :field {:name "city_ac"} (:city job))
(element :field {:name "city_exact"} (:city job))))))]
(with-open [out-file (java.io.FileWriter. "/tmp/foo.xml")]
(emit tags out-file)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment