philippkueng

(ns the-namespace.core
  (:require [clj-http.client :as client]
            [clojure.java.io :as io]))

(defn- fetch-photo!
  "makes an HTTP request and fetches the binary object"
  [url]
  (let [req (client/get url {:as :byte-array :throw-exceptions false})]
    (if (= (:status req) 200)
      (:body req))))