edge labels in visualisation

integration-tests
Josha von Gizycki 6 years ago
parent 15b5fe3bb5
commit 17fdd6c30b

@ -11,10 +11,12 @@
{:label (-> % :source :name)})
(:links-in instance))
relationships-out (map (fn [{:keys [link target schema]}]
[(:uuid instance) :> (:uuid target)])
[(:uuid instance) :> (:uuid target)
{:label (:name link)}])
(:links-out instance))
relationships-in (map (fn [{:keys [link source schema]}]
[(:uuid source) :> (:uuid instance)])
[(:uuid source) :> (:uuid instance)
{:label (:name link)}])
(:links-in instance))]
(-> [[(:uuid instance) {:label (:name instance)}]]
(into out-nodes)

Loading…
Cancel
Save