diff --git a/project.clj b/project.clj index e60c137..1164ad0 100644 --- a/project.clj +++ b/project.clj @@ -1,4 +1,4 @@ -(defproject bigbrother "0.1.0-SNAPSHOT" +(defproject bigbrother "0.1.1-SNAPSHOT" :description "Periodically send metrics" :url "http://github.com/yogsototh/bigbrother" :license {:name "MIT" diff --git a/src/bigbrother/core.clj b/src/bigbrother/core.clj index 23b887e..36d46c3 100644 --- a/src/bigbrother/core.clj +++ b/src/bigbrother/core.clj @@ -67,18 +67,15 @@ (when (number? v) (let [lvl-fn (get @level-by-key k) level (if lvl-fn (lvl-fn v) "ok")] - {:service (str @riemann-service " " (name k)) - :state level - :metric v}))) + (into + @riemann-conf + {:service (str @riemann-service " " (name k)) + :state level + :metric v})))) (defn send-to-riemann [m] (let [result-map (into @default-map m) - metric-data (into - {:service @riemann-service - :state "ok"} - @riemann-conf) - events (remove nil? (map to-riemann-event result-map)) - ] + events (remove nil? (map to-riemann-event result-map))] (when @riemann-conn (r/send-events @riemann-conn events))))