Meduza RSS parser in Clojure

meduza.clj

(defn find-tag [tag nodes]
  (->> nodes
       (filter #(= (:tag %) tag))
       first))

(defn tag-content [tag nodes]
  (-> (find-tag tag nodes)
      :content
      first))

(defn parse-date [date-str]
  (.parse (SimpleDateFormat. "E, dd MMM yyyy HH:mm:ss XX" java.util.Locale/US)
          date-str))

(->> (slurp "https://meduza.io/rss/all")
     clojure.data.xml/parse-str
     :content
     first
     :content
     (filter #(= (:tag %) :item))
     (map (fn [{:keys [content]}]
            {:title (tag-content :title content)
             :link (tag-content :link content)
             :image-url (-> (find-tag :enclosure content)
                            (get-in [:attrs :url]))
             :description (tag-content :description content)
             :published-at (parse-date (tag-content :pubDate content))})))