     (merge base-element {:attributes attributes}))))
   ([element]
     (element->map element false)))
-
-;; ***********************************************
 
 (def as-clojure (partial mapv element->map))
 

(ns falkor.parser
  (:import [org.jsoup.Jsoup]
           [org.jsoup.nodes Document Element]))

;; ****************************************************************
;; Low level API for parsing web pages into Clojure data structures
;; ****************************************************************

(defn get-document
  "Retrieve a web page and cast it to a Document object.

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

(defrecord DOMElement [tag text attributes])

(defn element->map
