Skip to content

Instantly share code, notes, and snippets.

@mwmitchell

mwmitchell/gist:797191

Created January 26, 2011 18:46
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 mwmitchell/797191 to your computer and use it in GitHub Desktop.
Save mwmitchell/797191 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
(defn partners []
(db/partners (fn [res] (doseq [item res]
(let [
mapped-doc (m/partner item)
solr-doc (solr/create-solr-document mapped-doc)]
(solr/add-document solr/connection solr-doc))))))
;
(defn partner-types []
(db/partner-types (fn [res] (doseq [item res]
(let [
mapped-doc (m/partner-type item)
solr-doc (solr/create-solr-document mapped-doc)]
(solr/add-document solr/connection solr-doc))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment