fix: tail

Author: tiensonqin

src/datascript/storage.cljs

@@ -158,13 +158,7 @@
                       :max-eid max-eid
                       :max-tx  max-tx})]
         (remember-db db)
-        [db (mapv #(keep (fn [[e a v tx]]
-                           ;; fix unique constraint
-                           (let [datom-exists? (some? (db/-datoms db :eavt e a v nil))
-                                 ;; retracted tx < 0
-                                 added? (> tx 0)]
-                             (when-not (and datom-exists? added?)
-                               (db/datom e a v tx)))) %)
+        [db (mapv #(mapv (fn [[e a v tx]] (db/datom e a v tx)) %)
                   tail)]))))
 
 (defn db-with-tail [db tail]