       this))
 
   (setup [this]
-    (let [session (:session this)
-          use-query (alia/prepare "USE :keyspace")]
+    (let [session (:session this)]
       (check-session session "Cassandra")
 
       (let [keyspace-config (:keyspace (:options this))]

                               (:name keyspace-config)
                               (hayt/with (:details keyspace-config))))

        (assoc this :keyspace (:name keyspace-config))))))


(defn make-cassandra-client

  protocols/DatabaseLifecycle

  (start [this]
    (spec/valid? ::cassanda-configuration options)
    (logger/info "Connecting to Cassandra cluster...")
    (let [session   (connect options)
          keyspace  (:name (:keyspace options))]

      (try
        (alia/execute session (format "USE %s;" keyspace))
        (catch  com.datastax.driver.core.exceptions.InvalidQueryException e
          (throw (Exception. "Keyspace is not present. You need to migrate first."))))
      (assoc this :session session :keyspace keyspace)))

  (stop [this]
    (if (:session this)
