improvements after initial run of 'lein kibit'

matthiasn · matthiasn · commit 1df2d05ad80c · 2014-09-28T03:31:45.000+02:00
diff --git a/Clojure-Websockets/src/clj/birdwatch/percolator/elastic.clj b/Clojure-Websockets/src/clj/birdwatch/percolator/elastic.clj
@@ -25,6 +25,6 @@
   "loop for finding percolation matches and delivering those on the appropriate socket"
   (go-loop [] (let [t (<! percolation-chan)
                     response (perc/percolate conn "percolator" "tweet" :doc t)
-                    matches (into #{} (map #(:_id %1) (esrsp/matches-from response)))] ;; set with SHAs
+                    matches (set (map :_id (esrsp/matches-from response)))] ;; set with SHAs
                 (put! percolation-matches-chan [t matches @subscriptions]) ;; send deref'd subscriptions as val
                 (recur))))
diff --git a/Clojure-Websockets/src/clj/birdwatch/twitterclient/processing.clj b/Clojure-Websockets/src/clj/birdwatch/twitterclient/processing.clj
@@ -22,7 +22,7 @@
   (fn [step]
     (let [cnt (volatile! 0)]
       (fn [r x]
-        (when (== (mod @cnt 1000) 0) (log/info "processed" @cnt "since startup"))
+        (when (zero? (mod @cnt 1000)) (log/info "processed" @cnt "since startup"))
         (vswap! cnt inc)
         (reset! last-received (t/now))
         (step r x)))))
