0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-04-01 09:31:26 -05:00

🐛 Fix passing clojure map as js map

This commit is contained in:
luisddm 2025-01-13 11:24:32 +01:00
parent 3af44641de
commit 3518f8160c
2 changed files with 4 additions and 2 deletions

View file

@ -962,7 +962,7 @@
(some? position-modifier)
(gpt/transform position-modifier))
max-height (when (some? viewport) (int (* (get viewport :height) 0.75)))
max-height (when (some? viewport) (int (* (:height viewport) 0.75)))
;; We should probably look for a better way of doing this.
bubble-margin {:x 24 :y 24}

View file

@ -55,6 +55,8 @@
(mapv (partial update-position positions))
(dcm/apply-filters local profile)))
viewport (assoc vport :offset-x pos-x :offset-y pos-y)
on-draft-cancel
(mf/use-fn #(st/emit! :interrupt))
@ -86,7 +88,7 @@
(when (seq (dcm/apply-filters local profile [thread]))
[:> cmt/comment-floating-thread* {:thread (update-position positions thread)
:profiles profiles
:viewport {:offset-x pos-x :offset-y pos-y :width (:width vport) :height (:height vport)}
:viewport viewport
:zoom zoom}])))
(when-let [draft (:comment drawing)]