     (string/join " " (map str ["M" "L" "L"] coords))))
 
 
-(defn line [from to color id]
+(defn svg-edge [[id [from to color]]]
   [:svg:path
    {:class "clickable"
     :id id

  (js/alert "123"))

(def vertex-loc [[40 40]
                 [100 40]
                 [100 100]
                 [40 100]])

(def edges-vec [[0 1 "red"]
                [1 2 "blue"]
                [2 3 "red"]
                [3 1 "red"]])

(map #(dommy.core/listen! % :click click-handler) (dommy.core/sel :.clickable))

; (dommy.core/append (dommy.core/parent (dommy.core/sel1 :circle))
;                    (crate/html
;                      [:svg:line]))

    :marker-end "url(#Vertex)"}])



(defn e->tid [e]
  (-> e
