我使用clj-xpath库从API中提取来自xml的数据。作为输出，我期待一个标签及其内容的mapa。我有一个有效的功能，这里是代码片段：
(use 'clj-xpath.core)
(def data-url
str "http://api.eventful.com/rest/events/search?" "app_key=4H4Vff4PdrTGp3vV&" "keywords=music&location=New+York&date=Future")
(defn create-keys [tags]
(into [] (map keyword tags)))
(defn tag-fn [tag] (partial $x:text tag))
(defn func-contents [tags root-tag data-url]
(map (apply juxt (map tag-fn tags)) (take 2 ($x root-tag (xml->doc (slurp data-url ))))))
(defn create-contents [tags root-tag data-url]
(map #(zipmap (create-keys tags) %) (func-contents tags root-tag data-url)))
但是，当我调用create-contents时，它不会添加键
(func-contents ["url" "title"] "//event" data-url)
(["http://newyorkcity.eventful.com/events/chamber-music-society-lincoln-center-mixed-wind-/E0-001- 067617553-1?utm_source=apis&utm_medium=apim&utm_campaign=apic" "Chamber Music Society of Lincoln Center - MIxed Winds"] ["http://newyorkcity.eventful.com/events/evil-dead-musical-/E0-001-070989019-4?utm_source=apis&utm_medium=apim&utm_campaign=apic" "Evil Dead The Musical"])
当我只评估它的身体时，它会给出预期的结果。
(map #(zipmap (create-keys ["url" "title"]) %) (func-contents ["url" "title"] "//event" data-url))
({:title "Chamber Music Society of Lincoln Center - MIxed Winds", :url "http://newyorkcity.eventful.com/events/chamber-music-society-lincoln-center-mixed-wind-/E0-001-067617553-1?utm_source=apis&utm_medium=apim&utm_campaign=apic"} {:title "Evil Dead The Musical", :url "http://newyorkcity.eventful.com/events/evil-dead-musical-/E0-001-070989019-4?utm_source=apis&utm_medium=apim&utm_campaign=apic"})
有什么想法吗？可能问题在于创建键功能，但我需要它，因为我想要任何一组标签的通用功能。