🐛 Fix problem with imported SVG on editing paths

This commit is contained in:
alonso.torres 2021-05-24 12:22:38 +02:00 committed by Andrés Moya
parent 42072f2584
commit 28c5fd4583
2 changed files with 5 additions and 1 deletions

View file

@ -22,7 +22,10 @@
(defn add-subpath-command
"Adds a command to the subpath"
[subpath command]
(let [p (upc/command->point command)]
(let [command (if (= :close-path (:command command))
(upc/make-line-to (:from subpath))
command)
p (upc/command->point command)]
(-> subpath
(assoc :to p)
(update :data conj command))))