s3 cljspad example

s3.cljs

(require '[sandbox.reagent :refer [render]]
         '[cljs.tools.reader.edn :as edn])

(def s3-url 
  "https://s3.amazonaws.com/sandbox.cljsfiddle.net/1/cljspad.manifest.edn")

(defn massage-it [str]
  (let [edn (edn/read-string str)]
    (map :name (:sandbox/libraries edn))))

(defn render-it [edn]
  (prn edn)
  (render [:pre [:code.language-clojure (pr-str edn)]]))

(-> (js/fetch s3-url)
    (.then #(.text %))
    (.then (comp render-it massage-it)))