From 8930dcb3ad02e491a024d73382f05770b00a163d Mon Sep 17 00:00:00 2001 From: Aphyr Date: Tue, 16 Jul 2013 08:52:14 -0700 Subject: [PATCH] Test now verifies that rationals work correctly. --- test/clj_librato/metrics_test.clj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/clj_librato/metrics_test.clj b/test/clj_librato/metrics_test.clj index ec3a1d0..802316e 100644 --- a/test/clj_librato/metrics_test.clj +++ b/test/clj_librato/metrics_test.clj @@ -39,7 +39,7 @@ (testing "gauge" (let [gauge {:name "test.gauge" :source "clj-librato" - :value (rand) + :value (/ (rand-int 1000) (rand-int 1000)) :measure-time (now)}] ; Submit gauge (collate user apikey [gauge] []) @@ -57,7 +57,7 @@ (is (= (:type metric) "gauge")) (is m) (is (= (:measure-time m) (:measure-time gauge))) - (is (= (:value m) (:value gauge))) + (is (= (:value m) (double (:value gauge)))) (is (= (:count m) 1))) )))