                     (rx/take 1))]
     (case (:type shape)
       :icon (on-init-draw-icon shape)
-      :image (on-init-draw-icon shape)
+      :image (on-init-draw-image shape)
       :path (if (:free shape)
               (on-init-draw-free-path shape stoper)
               (on-init-draw-path shape stoper))

               :y1 y
               :x2 (+ x 200)
               :y2 (+ y (/ 200 proportion))}
        shape (geom/setup shape props)]
    (st/emit! (uds/add-shape shape)
              (uds/select-first-shape)

      (gpt/divide @refs/selected-zoom)))

(declare on-init-draw-icon)
(declare on-init-draw-image)
(declare on-init-draw-path)
(declare on-init-draw-free-path)
(declare on-init-draw-generic)
