3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-30 08:28:33 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Snapping 180 angle with opposites handlers

Browse source
This commit is contained in:
alonso.torres 2021-04-21 17:39:47 +02:00
parent 961a7a2e03
commit 6331dff484
8 changed files with 108 additions and 56 deletions
Download patch file Download diff file Expand all files Collapse all files

24
frontend/src/app/util/path/commands.cljs
View file

@ -180,3 +180,27 @@
[content point]
(->> (d/enumerate content)
(filterv (fn [[idx cmd]] (= (command->point cmd) point)))))
(defn prefix->coords [prefix]
(case prefix
:c1 [:c1x :c1y]
:c2 [:c2x :c2y]
nil))
(defn handler->point [content index prefix]
(when (and (some? index)
(some? prefix)
(contains? content index))
(let [[cx cy :as coords] (prefix->coords prefix)]
(if (= :curve-to (get-in content [index :command]))
(gpt/point (get-in content [index :params cx])
(get-in content [index :params cy]))
(gpt/point (get-in content [index :params :x])
(get-in content [index :params :y]))))))
(defn handler->node [content index prefix]
(if (= prefix :c1)
(command->point (get content (dec index)))
(command->point (get content index))))