johanels/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-12-11 22:14:05 +01:00
Code Issues Actions 9 Packages Projects Releases Wiki Activity

🐛 Fix problems importing files

Browse Source
This commit is contained in:
Andrés Moya
2021-11-12 12:23:27 +01:00
committed by Andrey Antukh
parent da6c62414b
commit c5adeecd90
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
common/src/app/common/path/bool.cljc
View File

@@ -42,7 +42,8 @@
(let [head-p (gsp/command->point head)
head (cond
(and (= :close-path (:command head))
(< (gpt/distance last-p last-move) 0.01))
(or (nil? last-p) ;; Ignore consecutive close-paths
(< (gpt/distance last-p last-move) 0.01)))
nil
(= :close-path (:command head))

5
common/src/app/common/types/interactions.cljc
View File

@@ -69,8 +69,7 @@
(defmulti action-opts-spec :action-type)
(defmethod action-opts-spec :navigate [_]
(s/keys :req-un [::destination]
:opt-un [::preserve-scroll]))
(s/keys :opt-un [::destination ::preserve-scroll]))
(defmethod action-opts-spec :open-overlay [_]
(s/keys :req-un [::destination
@@ -87,7 +86,7 @@
::background-overlay]))
(defmethod action-opts-spec :close-overlay [_]
(s/keys :req-un [::destination]))
(s/keys :opt-un [::destination]))
(defmethod action-opts-spec :prev-screen [_]
(s/keys :req-un []))