Add missing action log entry ID attribute.

Datomic · Jan 25, 2016 · c34cc2e · c34cc2e
1 parent 29bc54e
commit c34cc2e
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/resources/simulant/schema.edn b/resources/simulant/schema.edn
@@ -150,6 +150,13 @@
     :db/doc "Identifier for the kind of step within an action."
     :db/cardinality :db.cardinality/one
     :db.install/_attribute :db.part/db}
+   {:db/id #db/id[:db.part/db]
+    :db/ident :actionLog/id
+    :db/valueType :db.type/uuid
+    :db/unique :db.unique/identity
+    :db/doc "A unique identifier for the action log item."
+    :db/cardinality :db.cardinality/one
+    :db.install/_attribute :db.part/db}
    {:db/id #db/id [:db.part/db]
     :db/ident :actionLog/sequence-number
     :db/valueType :db.type/long

diff --git a/src/simulant/action_log.clj b/src/simulant/action_log.clj
@@ -62,6 +62,7 @@
   current step is defined, also include a reference to it."
   [action process]
   (merge {:db/id (d/tempid :db.part/user)
+          :actionLog/id (d/squuid)
           :actionLog/sequence-number (swap! seq-counter inc)
           :actionLog/sim (-> process :sim/_processes only e)
           :actionLog/action (e action)}