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

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

(defn click-handler [e]
  (js/alert "123"))



(dommy.core/listen! (dommy.core/sel1 :circle) :click click-handler)

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


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