   Compilable
   (-compile [this opts]
     (let [fs (files this)]
-      (reload-clj-seq fs)
       (let [d (io/file dir)]
         (flatten (map #(-compile % (assoc opts :output-file (js-file-name d %)))
                       fs))))))

;; Sugar
;; =====

(defn clj-files-in [dirs & files]
  (let [clj (->Directories dirs (by-file-name (vec files)))]
    (->ClojureReloadable [clj])))

(defn shared

                                              "templates.clj"
                                              "api.clj"
                                              "application.clj"
                                              "snippets.clj"])
                               identity))
  (files clj-dirs)

  (def clj-r (->ClojureReloadable [clj-dirs]))
