   "Get the new filename for this file with the extension changed"
   [ext f]
   (-> (.getPath f)
+      (s/replace #"^src/coffee" "resources/public/js") ;; assets from src go to resources.
+      (s/replace #"^src/less" "resources/public/css")
       (s/replace #"\.\w+$" (str "." ext))))
 
 (def ^:private roots ;; The starting points to look for assets.


;; Private functions and vars.

(defn- compile-asset
  "Compile an asset, returning the name of the generated file."
  [f]

        content (:body resp)
        new-ext (ext-for (get-in resp content-type))
        new-name (with-new-ext new-ext f)]
    (ensure-directory-exists new-name)
    (spit new-name content)
    (info "Wrote" new-name)
    new-name)) ;; return the name we wrote the asset to.
