   (reset-spy-log [_] (reset! spy-log-atom [])))
 
 (defnk create-spy-session
-  [contact-points datacenter keyspace {port nil} {truncate-on-close nil}]
+  [contact-points datacenter keyspace {truncate-on-close nil} :as args]
   (->AliaSpySession
    keyspace
-   (create-alia-session* contact-points datacenter keyspace port)
+   (create-alia-session* (dissoc args :truncate-on-close))
    (atom [])
    truncate-on-close))
 

    SpySession
    KeyspaceProvider]))

(def ^:dynamic debug nil)

(defmacro with-debug
  [& forms]
  `(binding [debug true]
     ~@forms))

(defn- execute*
  [alia-session statement opts]
  (aliam/execute
   alia-session
   (if (string? statement)
     statement
     (do
       (when debug
         (prn statement))
       (h/->raw statement)))
   opts))


    (.close alia-session)))

(defnk create-session
  [contact-points datacenter keyspace :as args]
  (->AliaSession
   keyspace
   (create-alia-session* args)))

(defn mutated-tables
  [spy-session]
