diff --git a/resources/schema/seed-data.edn b/resources/schema/seed-data.edn index 7b342cfa..849594ab 100644 --- a/resources/schema/seed-data.edn +++ b/resources/schema/seed-data.edn @@ -70,8 +70,8 @@ #:db{:ident :event/new-gene} #:db{:ident :event/new-unnamed-gene} #:db{:ident :event/update-gene} - #:db{:ident :event/add-gene-other-names} - #:db{:ident :event/retract-gene-other-names} + #:db{:ident :event/add-other-names-gene} + #:db{:ident :event/retract-other-names-gene} #:db{:ident :event/merge-genes} #:db{:ident :event/undo-merge-genes} #:db{:ident :event/split-gene} diff --git a/src/wormbase/names/batch/gene.clj b/src/wormbase/names/batch/gene.clj index 4d9b43c5..1484bbde 100644 --- a/src/wormbase/names/batch/gene.clj +++ b/src/wormbase/names/batch/gene.clj @@ -125,7 +125,7 @@ :handler (fn [request] (wnbg/adjust-attr-vals :gene/id :gene/other-names - :event/add-gene-other-names + :event/add-other-names-gene ::wsg/update-other-names-batch wnu/conform-data true @@ -140,7 +140,7 @@ :handler (fn [request] (wnbg/adjust-attr-vals :gene/id :gene/other-names - :event/retract-gene-other-names + :event/retract-other-names-gene ::wsg/update-other-names-batch wnu/conform-data false diff --git a/src/wormbase/names/gene.clj b/src/wormbase/names/gene.clj index 9105f876..e3e48862 100644 --- a/src/wormbase/names/gene.clj +++ b/src/wormbase/names/gene.clj @@ -515,7 +515,7 @@ (assoc bad-request {:schema ::wsv/error-response}) (wnu/response-map)) :handler (fn [request] - (let [add-other-names (wne/update-multi-card identify :gene/id :event/add-gene-other-names :db/add ':gene/other-names)] + (let [add-other-names (wne/update-multi-card identify :gene/id :event/add-other-names-gene :db/add ':gene/other-names)] (add-other-names request identifier)))} :delete {:summary "Delete a set of other-names from a gene." @@ -527,7 +527,7 @@ (assoc bad-request {:schema ::wsv/error-response}) (wnu/response-map)) :handler (fn [request] - (let [delete-other-names (wne/update-multi-card identify :gene/id :event/retract-gene-other-names :db/retract ':gene/other-names)] + (let [delete-other-names (wne/update-multi-card identify :gene/id :event/retract-other-names-gene :db/retract ':gene/other-names)] (delete-other-names request identifier)))}})) (sweet/context "/merge/:from-identifier" [from-identifier] (sweet/resource