github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-05-11 02:58:25 +00:00
Code Issues Packages Projects Releases Wiki Activity

⚡ Add get-points helper, a faster alternative to content->points

Browse Source
This commit is contained in:
Andrey Antukh 2025-04-03 00:12:13 +02:00
parent 230e330eb2
commit da2f519805
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
common/src/app/common/types/path/segment.cljc
View File

@ -166,6 +166,16 @@
(some->> (seq content)
(into [] (keep segment->point)))))
(defn get-points
"Returns points for the given segment, faster version of
the `content->points`."
[content]
(impl/with-cache content "get-points"
(impl/-walk content
(fn [type _ _ _ _ x y]
(when (not= type :close-path)
(gpt/point x y))))))
(defn segments->content
([segments]
(segments->content segments false))