From 6b3fa31d68b07e1f128b7b546390a6d71cbe62de Mon Sep 17 00:00:00 2001 From: Andrey Antukh Date: Fri, 25 Aug 2023 12:28:30 +0200 Subject: [PATCH] :fire: Remove unused `top-nested-frame-ids` helper --- common/src/app/common/types/shape_tree.cljc | 17 ----------------- 1 file changed, 17 deletions(-) diff --git a/common/src/app/common/types/shape_tree.cljc b/common/src/app/common/types/shape_tree.cljc index 1ad19e8773..61380f3b4f 100644 --- a/common/src/app/common/types/shape_tree.cljc +++ b/common/src/app/common/types/shape_tree.cljc @@ -311,23 +311,6 @@ (or (:id current-shape) uuid/zero) (recur (get objects child-frame-id)))))))) -(defn top-nested-frame-ids - "Search the top nested frame in a list of ids" - [objects ids] - - (let [frame-ids (->> ids - (filter #(cph/frame-shape? objects %)) - (remove #(or (dm/get-in objects [% :hidden]) - (dm/get-in objects [% :blocked])))) - frame-set (set frame-ids)] - (loop [current-id (first frame-ids)] - (let [current-shape (get objects current-id) - child-frame-id (d/seek #(contains? frame-set %) - (-> (:shapes current-shape) reverse))] - (if (nil? child-frame-id) - (or current-id uuid/zero) - (recur child-frame-id)))))) - (defn get-viewer-frames ([objects] (get-viewer-frames objects nil))