Add store-identity protocol.

replikativ · Mar 20, 2023 · beb0f66 · beb0f66
1 parent 0d54a5f
commit beb0f66
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 4 deletions.
diff --git a/deps.edn b/deps.edn
@@ -1,7 +1,6 @@
 {:deps {org.clojure/clojure                         {:mvn/version "1.11.1" :scope "provided"}
-        io.replikativ/datahike                      {:mvn/version "0.6.1538"}
-        io.replikativ/superv.async                  {:mvn/version "0.2.11"}
-        io.replikativ/konserve-redis                   {:mvn/version "0.1.3"}}
+        io.replikativ/datahike                      {:mvn/version "0.6.1539" :scope "provided"}
+        io.replikativ/konserve-redis                   {:mvn/version "0.1.4"}}
  :paths ["src"]
  :aliases {:test   {:extra-deps  {lambdaisland/kaocha {:mvn/version "1.60.977"}}
                     :extra-paths ["test"]}

diff --git a/src/datahike_redis/core.clj b/src/datahike_redis/core.clj
@@ -1,9 +1,12 @@
 (ns datahike-redis.core
-  (:require [datahike.store :refer [empty-store delete-store connect-store default-config config-spec release-store]]
+  (:require [datahike.store :refer [empty-store delete-store connect-store default-config config-spec release-store store-identity]]
             [datahike.config :refer [map-from-env]]
             [konserve-redis.core :as k]
             [clojure.spec.alpha :as s]))
 
+(defmethod store-identity :redis [store-config]
+  [:redis (:uri store-config)])
+
 (defmethod empty-store :redis [store-config]
   (k/connect-store store-config))