   (->> (? doc xpath)
        (map element->map)))
 
-;; ***********************************************
-
 (defn run-query [url xpath]
   (??> (get-document url) xpath))
-
-;; Utility functions (WIP)
-;; ***********************************************
 
 (def first-selector (comp element->map first ?>))
 

          (assoc acc (keyword k) v)))
        {} attrs)))

;; ***********************************************

(defrecord DOMElement [tag text attributes])

(defn element->map

    (merge base-element {:attributes attributes}))))
  ([element]
    (element->map element false)))

(def as-clojure (partial mapv element->map))

