Fix...
This commit is contained in:
parent
92a6a41d5b
commit
86593f5b39
1 changed files with 2 additions and 2 deletions
|
@ -15,7 +15,7 @@
|
||||||
;; Atoms
|
;; Atoms
|
||||||
(def pool (atom nil)) ;; pool for async
|
(def pool (atom nil)) ;; pool for async
|
||||||
(def default-map (atom #{}))
|
(def default-map (atom #{}))
|
||||||
(def riemann-default (atom nil))
|
(def riemann-conf (atom nil))
|
||||||
(def riemann-conn (atom nil))
|
(def riemann-conn (atom nil))
|
||||||
(def riemann-service (atom "supercell"))
|
(def riemann-service (atom "supercell"))
|
||||||
(def level-by-key (atom nil))
|
(def level-by-key (atom nil))
|
||||||
|
@ -76,7 +76,7 @@
|
||||||
metric-data (into
|
metric-data (into
|
||||||
{:service @riemann-service
|
{:service @riemann-service
|
||||||
:state "ok"}
|
:state "ok"}
|
||||||
@riemann-default)
|
@riemann-conf)
|
||||||
events (remove nil? (map to-riemann-event result-map))
|
events (remove nil? (map to-riemann-event result-map))
|
||||||
]
|
]
|
||||||
(when @riemann-conn
|
(when @riemann-conn
|
||||||
|
|
Loading…
Reference in a new issue