 (ns doctopus.storage-impls.temp-fs
-  (:require [me.raynes.fs :as fs]
-            [doctopus.files.storage-impls :refer :all])
+  (:require [doctopus.files :as files]
+            [doctopus.files.storage-impls :refer :all]
+            [me.raynes.fs :as fs])
   (:import [doctopus.files.storage-impls.BackendImplementation]))
 
 ;; The root of the temp filesystem. Each Thing will store its stuff

  (doseq [[path html] path-html-pairs] (save-html-file key path html)))

(defn load-fn
  [key])

  [rel-path]
  (let [html-re #"\.html$"
        assure-suffix #(if (re-find html-re rel-path) rel-path (str rel-path ".html"))
        file-handle (fs/file @temp-dir rel-path)]
    (slurp file-handle)))

(defn save-html-file
