Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-09 16:30:37 -05:00
Code Issues Activity

🐛 Fix comments positioning on viewer (regression)

Browse source
This commit is contained in:
Andrey Antukh 2022-08-24 10:59:38 +02:00
parent 1e9fb6e391
commit be1c19e718
1 changed files with 3 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
frontend/src/app/main/ui/viewer/comments.cljs
View file

@ -91,7 +91,6 @@
(mf/defc comments-layer
[{:keys [zoom file users frame page] :as props}]
(prn "comments-layer")
(let [profile (mf/deref refs/profile)
local (mf/deref refs/comments-local)
@ -113,12 +112,12 @@
modifier1 (mf/with-memo [frame-corner]
(-> (gmt/matrix)
(gmt/translate (gpt/negate frame-corner))))
modifier2 (mf/with-memo [frame-corner]
(-> (gpt/point frame-corner)
(gmt/translate-matrix)))
threads (mf/with-memo [threads-map positions]
threads (mf/with-memo [threads-map positions frame local profile]
(->> (vals threads-map)
(map (partial update-thread-position positions))
(filter #(= (:frame-id %) (:id frame)))
@ -126,7 +125,6 @@
(filter (fn [{:keys [position]}]
(gsh/has-point? frame position)))))
on-bubble-click
(mf/use-fn
(mf/deps open-thread-id)
@ -160,9 +158,7 @@
(mf/use-fn
(mf/deps frame-id modifier2)
(fn [draft]
(let [params (-> draft
(update :position gpt/transform modifier2)
(assoc :frame-id frame-id))]
(let [params (assoc draft :frame-id frame-id)]
(st/emit! (dcm/create-thread-on-viewer params)
(dcm/close-thread)))))]