From 417724f6ce3f2408abf03104d241283d30c0174e Mon Sep 17 00:00:00 2001 From: Yann Esposito Date: Wed, 22 Apr 2015 12:12:52 +0200 Subject: [PATCH] make things a bit more stricter --- project.clj | 2 +- src/bigbrother/timer.clj | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/project.clj b/project.clj index a1b79d0..ce8de9c 100644 --- a/project.clj +++ b/project.clj @@ -1,4 +1,4 @@ -(defproject bigbrother "0.1.4" +(defproject bigbrother "0.1.4.2" :description "Periodically send metrics" :url "http://github.com/yogsototh/bigbrother" :license {:name "MIT" diff --git a/src/bigbrother/timer.clj b/src/bigbrother/timer.clj index 1f3397b..79537a8 100644 --- a/src/bigbrother/timer.clj +++ b/src/bigbrother/timer.clj @@ -17,6 +17,7 @@ (cond (empty? st) st2 (empty? st2) st :else (doall (map add-one-sumtime st st2)))) + (defn fmap-sumtimes [f st] (map (fn [v] [(first v) [(f (ts-timespent v)) (ts-nb v)]]) st))