3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-21 00:36:12 +02:00
Code Issues Projects Releases Packages Wiki Activity

🐛 Fix problems with zoomIntoView

Browse source
This commit is contained in:
alonso.torres 2025-02-05 13:22:52 +01:00 • committed by Andrey Antukh
parent b0d0abb0ad
commit 8217bbc7a0
2 changed files with 10 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

17
frontend/src/app/plugins/viewport.cljs
View file

@ -8,11 +8,11 @@
(:require
[app.common.data.macros :as dm]
[app.common.spec :as us]
[app.common.uuid :as uuid]
[app.main.data.workspace.viewport :as dwv]
[app.main.data.workspace.zoom :as dwz]
[app.main.store :as st]
[app.plugins.format :as format]
[app.plugins.shape :as ps]
[app.plugins.utils :as u]
[app.util.object :as obj]))
@ -85,12 +85,13 @@
:zoomIntoView
(fn [shapes]
(let [ids
(->> shapes
(map (fn [v]
(if (string? v)
(uuid/uuid v)
(uuid/uuid (obj/get v "x"))))))]
(st/emit! (dwz/fit-to-shapes ids))))))
(cond
(not (every? ps/shape-proxy? shapes))
(u/display-not-valid :zoomIntoView "Argument should be valid shapes")
:else
(let [ids (->> shapes
(map (fn [shape] (obj/get shape "$id"))))]
(st/emit! (dwz/fit-to-shapes ids)))))))