        :bookmark/title title
        :bookmark/user uid}])))
 
-(defn get-bookmark [{:keys [url email]}]
+(defn get-bookmark [conn {:keys [url email]}]
   (let [query '[:find ?url ?title ?tx
                :in $ ?url ?email
                :where

    (d/q query db eid attr)))


(defn transact-bookmark [{:keys [url title email]}]
  (let [uid (get-user-id email)]
    (d/transact
     conn


(defn get-all-users
  "Retrieve all users"
  [conn]
  (map
   first
   (d/q '[:find ?email
