       (cdn-url manifest-value))
     path))
 
+;; TODO: make the caller set credentials
 (defn fetch-specific-manifest [bucket key]
   (amazonica.core/with-credential [aws-access-key aws-secret-key]
     (-> (s3/get-object :bucket-name bucket :key key)

  (:import java.security.MessageDigest
           org.apache.commons.codec.binary.Hex
           org.apache.commons.io.IOUtils))

(def aws-access-key "AKIAJ6CLYJYRMXJGMMEQ")
(def aws-secret-key "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")

                                         {:name source :content (clojure.java.io/file (fs/join (fs/dirname source-map) source))})))})))

(defn upload-manifest [sha1]
  ;; TODO: this is dumb, we shouldn't write to the file
  (update-sourcemap-url assets-directory "/cljs/production/frontend.js")
  (amazonica.core/with-credential [aws-access-key aws-secret-key]
    (let [manifest-key (str "releases/" sha1)
