Create a gist now

Instantly share code, notes, and snippets.

Embed
What would you like to do?
;; Extracting from Datomic datoms which need to be migrated to the PrivateDataStore
(d/q '[:find ?e ?old-a ?new-a ?v
:in $ [[?old-a ?new-a]]
:where
[?e ?old-a ?v]
(not [?e ?new-a])]
db
[[:user/email :user/email--k]
[:user/first-name :user/first-name--k]
[:user/last-name :user/last-name--k]])
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment