 
 
 (defn shutdown-state
+  "Go over the current command-loop state, and shutdown anything that
+  needs shutting down when the containium is about to stop."
   [state]
   (when-let [server (:nrepl state)]
     (nrepl/stop-server server)

    (f systems)))



(defn start-box
  [module resolve-dependencies]
  (try
    (let [box (boxure {:resolve-dependencies resolve-dependencies



(defn start-boxes
  "Starts all the boxes in the specified spec."
  [spec systems]
  (let [{:keys [config modules resolve-dependencies]} spec]
    (loop [modules modules
