dom-logic prelude

gistfile1.clj

(ns dom-logic.core
  (:refer-clojure :exclude [==])
  (:require [clojure.core.logic :refer :all]
            [clj-http.client :as client]
            [pl.danieljanus.tagsoup :as tagsoup]))

(defn get-parsed-html [url]
  (-> url
      client/get
      :body
      tagsoup/parse-string))

(get-parsed-html "http://www.yelp.com")
;; Parsed HTML nodes look like this:
;; [:div {:class foo :other-attrs bar} &children]