Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-04-04 11:01:20 -05:00
Code Issues Activity

Activate by default path simplification.

Browse source
This commit is contained in:
Andrey Antukh 2016-08-13 02:42:20 +03:00
parent e701793e44
commit 9e904e4247
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
2 changed files with 9 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/uxbox/main/ui/workspace/drawarea.cljs
View file

@ -195,8 +195,10 @@
dx (- 0 minx)
dy (- 0 miny)
;; _ (println "Initial number of points:" (count points))
points (mapv #(gpt/add % [dx dy]) points)
;; points (path/simplify points)
points (path/simplify points 0.1)
;; _ (println "Final number of points:" (count points))
width (- maxx minx)
height (- maxy miny)]
@ -227,7 +229,7 @@
(defn- on-init-draw-generic
[shape]
(let [mouse (->> (rx/sample 10 wb/mouse-viewport-s)
(let [mouse (->> wb/mouse-viewport-s
(rx/mapcat (fn [point]
(if @wb/alignment-ref
(uds/align-point point)

8
src/uxbox/util/geom/path.cljs
View file

@ -8,6 +8,8 @@
(:require [uxbox.util.geom.path-impl-simplify :as impl-simplify]))
(defn simplify
[points]
(let [points (into-array points)]
(into [] (impl-simplify/simplify points 10 true))))
([points]
(simplify points 0.1))
([points tolerance]
(let [points (into-array points)]
(into [] (impl-simplify/simplify points tolerance true)))))