Improve naming in some function on svg ns.

This commit is contained in:
Andrey Antukh 2016-01-23 22:11:32 +02:00
parent 795b32c4b4
commit daa09627c8

View File

@ -60,8 +60,8 @@
apply-rotation)) apply-rotation))
(defn calculate-transform (defn calculate-transform
[attrs] [shape]
(let [result (->> (interpret-attrs attrs) (let [result (->> (interpret-attrs shape)
(apply mtx/multiply) (apply mtx/multiply)
(deref) (deref)
(take 6) (take 6)