   (:require [cljs-uuid-utils.core :as uuid]
             [great-things-done.db :as db]))
 
+(def ^:private task-types ["Task" "SubTask"])
+
+;; Caches
 (def ^:private meta-projects      (atom []))
+(def ^:private projects           (atom {}))
 (def ^:private active-projects    (atom {}))
 (def ^:private completed-projects (atom {}))
+(def ^:private tasks              (atom {}))
 (def ^:private active-tasks       (atom {}))
 (def ^:private repeating-tasks    (atom {}))
 (def ^:private completed-tasks    (atom {}))

  "Return the current time as a string"
  []
  (str (.now js/Date)))

(defn- register-tags!
  [entry entry-type]

  [project-name tags tasks description due-date active done]
  {:name          project-name
   :id            (build-id project-name)
   :type          "Project"
   :tags          tags
   :tasks         tasks
   :description   description
