Skip to content

Commit 817e2ec

Browse files
committed
rearrange tool base
1 parent 8d1b611 commit 817e2ec

File tree

1 file changed

+15
-13
lines changed

1 file changed

+15
-13
lines changed

src/renderer/tool/base.cljs

Lines changed: 15 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -14,6 +14,7 @@
1414
(derive :metadata ::descriptive)
1515
(derive :title ::descriptive)
1616

17+
;; Tool multimethods.
1718
(defmulti pointer-down (fn [db _e] (:tool db)))
1819
(defmulti pointer-move (fn [db _e] (:tool db)))
1920
(defmulti pointer-up (fn [db _e] (:tool db)))
@@ -27,19 +28,6 @@
2728
(defmulti deactivate :tool)
2829
(defmulti properties keyword)
2930

30-
(defmulti render :tag)
31-
(defmulti render-to-string :tag)
32-
(defmulti path :tag)
33-
(defmulti area :tag)
34-
(defmulti centroid :tag)
35-
(defmulti snapping-points :tag)
36-
(defmulti render-edit :tag)
37-
(defmulti bounds (fn [el _elements] (:tag el))) ; REVIEW
38-
(defmulti translate (fn [el _offset] (:tag el)))
39-
(defmulti position (fn [el _position] (:tag el)))
40-
(defmulti scale (fn [el _ration _pivot-point] (:tag el)))
41-
(defmulti edit (fn [el _offset _handle] (:tag el)))
42-
4331
(defmethod pointer-down :default [db _e] db)
4432
(defmethod pointer-up :default [db _e] db)
4533
(defmethod pointer-move :default [db _e] db)
@@ -53,6 +41,20 @@
5341
(defmethod deactivate :default [db] (assoc db :cursor "default"))
5442
(defmethod properties :default [])
5543

44+
;; Element multimethods.
45+
(defmulti render :tag)
46+
(defmulti render-to-string :tag)
47+
(defmulti path :tag)
48+
(defmulti area :tag)
49+
(defmulti centroid :tag)
50+
(defmulti snapping-points :tag)
51+
(defmulti render-edit :tag)
52+
(defmulti bounds (fn [el _elements] (:tag el))) ; REVIEW
53+
(defmulti translate (fn [el _offset] (:tag el)))
54+
(defmulti position (fn [el _position] (:tag el)))
55+
(defmulti scale (fn [el _ration _pivot-point] (:tag el)))
56+
(defmulti edit (fn [el _offset _handle] (:tag el)))
57+
5658
(defmethod render :default [])
5759
(defmethod render-to-string :default [element] [render element])
5860
(defmethod render-edit :default [])

0 commit comments

Comments
 (0)