             [clojure.java.io :as io]
             [clojure.data.json :as json]
             [clojure.string :as string]
+            [tames.debug :as debug]
             [tames.filesystem :as fs]
             [tames.log :as log])
   (:import (java.io File InputStream)

              file))))

(defn init
  []
  (let [file   (ensure-config-file)
        result (not (nil? file))]
    (when result
      (reset! path (. file getAbsolutePath))

  (. (File. @path) lastModified))

(defn ensure-config-file
  [path]
  (let [default-path (format "data/%s/%s.json" CLASS_ID DEFAULT_ID)
        file         (File. (fs/get-absolute-path (if (empty? path) default-path path)))
        dir          (. file getParentFile)]
    (cond (not (. dir exists))
