     :viewBox "0 0 10 10"
     :refX "1"
     :refY "5"
-    :markerWidth "6"
-    :markerHeight "6"
+    :markerWidth "3"
+    :markerHeight "3"
     :orient "auto"}
    [:svg:path {:d "M0,0 L 10,5 L0,10 z"}]]
   )


(defn line [from to color]
  [:svg:path
   {:d (make-line-dirs from to)
    :stroke color
    :stroke-width "4px"
    :fill "none"
    :marker-mid "url(#Triangle)"}])


                                         :cx 50 :cy 50
                                         :r 50}]]))

(defn e->tid [e]
  (-> e
      (js->clj)
      (.-target)
      (.-id)))

(defn click-handler [e]
  (.log js/console (e->tid e))
  (js/alert "123"))



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

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

