Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-10 08:50:57 -05:00
Code Issues Activity

Merge pull request #3165 from penpot/hiru-board-selection

Browse source 
✨ Give frames that are components more priority on selection
This commit is contained in:
Pablo Alba 2023-04-25 21:31:01 +02:00 committed by GitHub
commit f14641396f
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 19 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
common/src/app/common/types/shape_tree.cljc
View file

@ -179,34 +179,34 @@
parents-a (cons id-a parents-a)
parents-b (into #{id-b} parents-b)
;; Search for the common frame in order
base (or (d/seek parents-b parents-a) uuid/zero)
;; Search for the common parent (frame or group) in order
base-id (or (d/seek parents-b parents-a) uuid/zero)
idx-a (get parents-a-index base)
idx-b (get parents-b-index base)]
idx-a (get parents-a-index base-id)
idx-b (get parents-b-index base-id)]
[base idx-a idx-b]))
[base-id idx-a idx-b]))
(defn is-shape-over-shape?
[objects base-shape-id over-shape-id bottom-frames?]
(let [[base index-a index-b] (get-base objects base-shape-id over-shape-id)]
(let [[base-id index-a index-b] (get-base objects base-shape-id over-shape-id)]
(cond
;; The base the base shape, so the other item is bellow (if not bottom-frames)
(= base base-shape-id)
(and bottom-frames? (cph/frame-shape? objects base))
;; The base the base shape, so the other item is below (if not bottom-frames)
(= base-id base-shape-id)
(and bottom-frames? (cph/frame-shape? objects base-id))
;; The base is the testing over, so it's over (if not bottom-frames)
(= base over-shape-id)
(or (not bottom-frames?) (not (cph/frame-shape? objects base)))
(= base-id over-shape-id)
(or (not bottom-frames?) (not (cph/frame-shape? objects base-id)))
;; Check which index is lower
:else
;; If the base is a layout we should check if the z-index property is set
(let [[z-index-a z-index-b]
(if (ctl/any-layout? objects base)
[(ctl/layout-z-index objects (dm/get-in objects [base :shapes index-a]))
(ctl/layout-z-index objects (dm/get-in objects [base :shapes index-b]))]
(if (ctl/any-layout? objects base-id)
[(ctl/layout-z-index objects (dm/get-in objects [base-id :shapes index-a]))
(ctl/layout-z-index objects (dm/get-in objects [base-id :shapes index-b]))]
[0 0])]
(if (= z-index-a z-index-b)

6
frontend/src/app/main/ui/workspace/viewport/hooks.cljs
View file

@ -11,6 +11,7 @@
[app.common.geom.shapes :as gsh]
[app.common.pages :as cp]
[app.common.pages.helpers :as cph]
[app.common.types.component :as ctk]
[app.common.types.shape-tree :as ctt]
[app.common.uuid :as uuid]
[app.main.data.shortcuts :as dsc]
@ -221,7 +222,10 @@
root-frame-with-data?
#(as-> (get objects %) obj
(and (cph/root-frame? obj) (d/not-empty? (:shapes obj))))
(and (cph/root-frame? obj)
(d/not-empty? (:shapes obj))
(not (ctk/instance-root? obj))
(not (ctk/main-instance? obj))))
;; Set with the elements to remove from the hover list
remove-id-xf