0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-03-12 07:41:43 -05:00

🐛 Fix problem with frame guides

This commit is contained in:
alonso.torres 2024-09-17 14:49:39 +02:00 committed by Alonso Torres
parent 21dd9a260c
commit 2b2a84da64
4 changed files with 4 additions and 4 deletions

View file

@ -28,7 +28,7 @@
(watch [_ state _] (watch [_ state _]
(let [page-id (:current-page-id state) (let [page-id (:current-page-id state)
page (dm/get-in state [:workspace-data :pages-index page-id]) page (dm/get-in state [:workspace-data :pages-index page-id])
params (or (dm/get-in page [:grids :square]) params (or (dm/get-in page [:default-grids :square])
(:square ctg/default-grid-params)) (:square ctg/default-grid-params))
grid {:type :square grid {:type :square
:params params :params params

View file

@ -24,7 +24,7 @@
[rumext.v2 :as mf])) [rumext.v2 :as mf]))
(def lens:default-grids (def lens:default-grids
(l/derived :default-grids refs/workspace-data)) (l/derived :default-grids refs/workspace-page))
(defn- get-size-options [] (defn- get-size-options []
[{:value nil :label (tr "workspace.options.grid.auto")} [{:value nil :label (tr "workspace.options.grid.auto")}

View file

@ -1251,7 +1251,7 @@
{:name "rulerGuides" {:name "rulerGuides"
:get :get
(fn [_] (fn [_]
(let [guides (-> (u/locate-page file-id page-id) :options :guides)] (let [guides (-> (u/locate-page file-id page-id) :guides)]
(->> guides (->> guides
(vals) (vals)
(filter #(= id (:frame-id %))) (filter #(= id (:frame-id %)))

View file

@ -129,7 +129,7 @@
ruler-id (obj/get proxy "$id") ruler-id (obj/get proxy "$id")
page (locate-page file-id page-id)] page (locate-page file-id page-id)]
(when (some? page) (when (some? page)
(d/seek #(= (:id %) ruler-id) (-> page :options :guides vals))))) (d/seek #(= (:id %) ruler-id) (-> page :guides vals)))))
(defn proxy->interaction (defn proxy->interaction
[proxy] [proxy]