[boot]: adding logging and t.namespace

This commit is contained in:
anatoly 2015-12-20 19:16:48 -05:00
parent d67f318ef1
commit 8f9f44e3cc

View file

@ -17,29 +17,39 @@
[com.datomic/datomic-free "0.9.5327" :scope "provided" :exclusions [joda-time]] [com.datomic/datomic-free "0.9.5327" :scope "provided" :exclusions [joda-time]]
;; boot ;; boot
[boot/core "2.5.1" :scope "provided"] [boot/core "2.5.1" :scope "provided"]
[adzerk/bootlaces "0.1.13" :scope "test"] [adzerk/bootlaces "0.1.13" :scope "test"]
[adzerk/boot-test "1.0.6" :scope "test"]]) [adzerk/boot-logservice "1.0.1" :scope "test"]
[adzerk/boot-test "1.0.6" :scope "test"]])
(require '[adzerk.bootlaces :refer :all] (require '[adzerk.bootlaces :refer :all]
'[adzerk.boot-test :as bt]) '[adzerk.boot-test :as bt]
'[adzerk.boot-logservice :as log-service]
'[clojure.tools.logging :as log]
'[clojure.tools.namespace.repl :refer [set-refresh-dirs]])
(def +version+ "0.1.7-SNAPSHOT") (def +version+ "0.1.7-SNAPSHOT")
(bootlaces! +version+) (bootlaces! +version+)
(def log-config
[:configuration
[:appender {:name "STDOUT" :class "ch.qos.logback.core.ConsoleAppender"}
[:encoder [:pattern "%-5level %logger{36} - %msg%n"]]]
[:root {:level "TRACE"}
[:appender-ref {:ref "STDOUT"}]]])
(deftask dev [] (deftask dev []
(set-env! :source-paths #(conj % "dev/clj")) (set-env! :source-paths #(conj % "dev/clj"))
(defn in [] (alter-var-root #'log/*logger-factory*
(load-data-readers!) (constantly (log-service/make-factory log-config)))
(require 'dev) (apply set-refresh-dirs (get-env :directories))
(in-ns 'dev)) (load-data-readers!)
(comp (require 'dev)
(watch) (in-ns 'dev))
(repl)))
(deftask test [] (deftask test []
(set-env! :source-paths #(conj % "test" "test/clj")) ;; (!) :source-paths must not overlap. (set-env! :source-paths #(conj % "test" "test/clj")) ;; (!) :source-paths must not overlap.