Make options backwrads-compatible

clojurewerkz · Jan 9, 2016 · d64b750 · d64b750
1 parent c9f2e1c
commit d64b750
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/clojure/clojurewerkz/cassaforte/query.clj b/src/clojure/clojurewerkz/cassaforte/query.clj
@@ -554,7 +554,7 @@
                        statements)))
 
 (def ^:private create-keyspace-options
-  {:replication    (fn [opts replication] (.replication opts replication))
+  {:replication    (fn [opts replication] (.replication opts (clojure.walk/stringify-keys replication)))
    :durable-writes (fn [opts durable-writes] (.durableWrites opts durable-writes))})
 
 (defn resolve-create-keyspace-option

diff --git a/test/clojure/clojurewerkz/cassaforte/query_test.clj b/test/clojure/clojurewerkz/cassaforte/query_test.clj
@@ -580,8 +580,8 @@
           (create-keyspace "foo"
                            (with
                             {:replication
-                             {"class"              "SimpleStrategy"
-                              "replication_factor" 1}})
+                             {:class              "SimpleStrategy"
+                              :replication_factor 1}})
                            (if-not-exists))))))
 
 (deftest test-alter-keyspace