 
 (defn get-transform-css [{rotation :Rotation, scale :Scale, pivot :PivotPoint, 
                           :or {rotation 0, scale 1, pivot {:x 0, :y 0}}}]
-  {html5TransformProperty (str "rotation(" rotation ") scale(" scale ")")
+  {html5TransformProperty (str "rotate(" (mod (/ (* rotation 180) js/Math.PI) 360) "deg) scale(" scale "," scale ")")
    html5TransformOriginProperty (str (:x pivot) "px " (:y pivot) "px")})
 
 (defn get-visibility-css [value]

              :BorderRadius (get-border-radius-css value)
              :BorderStyle (get-border-style-css value)
              :DropShadow (get-drop-shadow-css value)
              ;; more to come... 
                nil))) (get ->self :shape))))

; morph component + rendering functions

    e))

(defn render-path-node [app owner]
  ; (prn (flatten (map unpack (get-in app [:shape :PathElements]))))
  (let [vertices (flatten (map unpack (get-in app [:shape :PathElements])))
        minX (apply min (map #(% :x) vertices))
        minY (apply min (map #(% :y) vertices))
