old and new versions of player-lookup

gistfile1.clj

; old
(defn player-lookup [last-name]
  (.send goog.net.XhrIo (str "/player/" last-name)
     display-results)) 

; new
(defn player-lookup [lastname]
  (.send goog.net.XhrIo (str "/player/" lastname)
    (fn [data] 
      (ps/publish-results (js->clj (.getResponseJson (.-target data)) :keywordize-keys true)))))