michael/grub-fork
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Comment out user.clj to make building work

Browse source
This commit is contained in:
Nicholas Kariniemi 2015-06-08 23:37:30 +03:00
parent 48067a00f6
commit c7caec9a3b
1 changed files with 28 additions and 28 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

56
dev/user.clj
View file

@ -1,28 +1,28 @@
(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))
;(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))