Merge pull request #61 from KushalP/master

Simplify the equality check against 0
mmcgrana · cf038f73e0fd2ea734a95b8075827e6436cbeeca · weavejester committed Mar 17, 2012 · Mar 17, 2012 · cf038f7
2 parents 3bdf0d3 + 888a529
commit cf038f73e0fd2ea734a95b8075827e6436cbeeca
Unified Split

Showing with 3 additions and 6 deletions.

+3 −6 ring-core/src/ring/middleware/session/cookie.clj
@@ -79,12 +79,9 @@
 
 (defn- secure-compare [^String a ^String b]
   (if (and a b (= (.length a) (.length b)))
-      (= 0
-         (reduce bit-or
-                 (map bit-xor
-                      (.getBytes a)
-                      (.getBytes b))))
-      false))
+    (zero? (reduce bit-or
+                   (map bit-xor (.getBytes a) (.getBytes b))))
+    false))
 
 (defn- unseal
   "Retrieve a sealed Clojure data structure from a string"