 (defn stop-night [night]
   (dorun
     [(stop-task night)]))
+
+(defn load-day! []
+  (dosync (ref-set num-days (persistence/load-days))))

(ns iyye.resource
  (:require
    [iyye.task :refer [start-task stop-task]]
    [clojure.tools.logging :as log]))

(defprotocol Resource

(defn start-night [night]
  (doall
    [(start-task night)
     (persistence/record-night @num-days)
     (dosync ref-set (:night-start night) (System/currentTimeMillis))]))

(defn stop-day [day]
