Make int-to-bool pass through non-integer values. Failed when using m…

…ulti/exec/discard otherwise.

Bump version to 1.2.4

project.clj

@@ -1,4 +1,4 @@
-(defproject redis-clojure "1.2.3"
+(defproject redis-clojure "1.2.4"
   :description "A client library for Redis"
   :url "http://github.com/ragnard/redis-clojure"
   :dependencies [[org.clojure/clojure "1.2.0"]

src/redis/commands.clj

@@ -6,7 +6,7 @@
 ;;; Command definitions
 
 ;; Utility conversion functions
-(defn- int-to-bool [n] (< 0 n))
+(defn- int-to-bool [n] (if (integer? n) (< 0 n) n))
 (defn- string-to-keyword [s] (keyword s))
 (defn- string-to-double [s] (when s (Double/parseDouble s)))
 (defn- seq-to-set [seq] (when seq (clojure.core/set seq)))