2015-06-08 20:37:30 +00:00
|
|
|
;(ns user
|
|
|
|
|
; (:require [grub.core :as system]
|
|
|
|
|
; [clojure.java.io :as io]
|
|
|
|
|
; [clojure.string :as str]
|
|
|
|
|
; [clojure.pprint :refer (pprint)]
|
|
|
|
|
; [clojure.repl :refer :all]
|
|
|
|
|
; [clojure.test :as test]
|
|
|
|
|
; [clojure.tools.namespace.repl :refer (refresh refresh-all)]))
|
|
|
|
|
;
|
|
|
|
|
;(clojure.tools.namespace.repl/set-refresh-dirs "src/clj" "target/classes")
|
|
|
|
|
;
|
|
|
|
|
;(def system nil)
|
|
|
|
|
;
|
|
|
|
|
;(defn start
|
|
|
|
|
; "Starts the current development system."
|
|
|
|
|
; []
|
|
|
|
|
; (alter-var-root #'system (constantly system/dev-system))
|
|
|
|
|
; (alter-var-root #'system system/start))
|
|
|
|
|
;
|
|
|
|
|
;(defn stop
|
|
|
|
|
; "Shuts down and destroys the current development system."
|
|
|
|
|
; []
|
|
|
|
|
; (alter-var-root #'system
|
|
|
|
|
; (fn [s] (when s (system/stop s)))))
|
|
|
|
|
;
|
|
|
|
|
;(defn reset []
|
|
|
|
|
; (stop)
|
|
|
|
|
; (refresh :after 'user/start))
|
