 
 (defn ^:private force-key-seq
   [table]
-  (assoc table :key (k/make-sequential (:key table))))
+  (assoc table :key (v/coerce (:key table))))
 
 (defn ^:private force-key-seqs
   [entity-schema table-seq-key]

   [cats.labs.manifold :refer [deferred-context]]
   [schema.core :as s]
   [clj-time.core :as t]
   [er-cassandra.key :as k]))

(s/defschema CallbackFnSchema

   (s/optional-key :callbacks) CallbacksSchema
   (s/optional-key :versioned?) s/Bool})


(s/defrecord Entity
    [primary-table :- PrimaryTableSchema
     unique-key-tables :- [UniqueKeyTableSchema]
