 ;;               em (PersistentEntityMap. e nil)]
 ;;           (try
 ;;             (f em)
-;;             (.put ds e)
+;;             (.put datastore e)
 ;;             (.commit txn)
 ;;             (finally
 ;;               (if (.isActive txn)

  []
  ;; (log/trace "pull-all")
  (let [q  (Query.)
        prepared-query (.prepare ds q) ;; FIXME
        iterator (.asIterator prepared-query)
        ;; res (migae.datastore.PersistentEntityMapSeq. (iterator-seq iterator))
        seq (iterator-seq iterator)

;;          (let [k (:migae/keychain (meta arg))]
;;            ;; (log/trace "edn key: " k " improper?" (improper-keychain? k))
;;            (cond
;;              (ds/improper-keychain? k)
;;              (put-kinded-emap k arg)
;;              (ds/proper-keychain? k)
;;              (put-proper-emap :keyvec k :propmap arg :force true)
;;              :else (throw (IllegalArgumentException. (str "INVALID KEYCHAIN!: " k)))))
;;          )
;;        (ds/keychain? arg)
;;        (do
;;          (cond
;;            (ds/improper-keychain? arg)
;;            (put-kinded-emap arg {})
;;            (ds/proper-keychain? arg)
;;            (put-proper-emap :keyvec arg :propmap {} :force true)
;;            :else (throw (IllegalArgumentException. (str "Invalid keychain" arg)))))
;;        :else (throw (IllegalArgumentException.)))))
