Improve audit events on inspect copy operations

This commit is contained in:
Andrey Antukh 2024-02-29 16:29:34 +01:00 committed by Alonso Torres
parent 00ee6833c8
commit 942989824a
3 changed files with 26 additions and 20 deletions

View file

@ -153,20 +153,24 @@
(cb/format-code markup-type)))) (cb/format-code markup-type))))
on-markup-copied on-markup-copied
(mf/use-callback (mf/use-fn
(mf/deps markup-type) (mf/deps markup-type from)
(fn [] (fn []
(st/emit! (ptk/event ::ev/event (let [origin (if (= :workspace from) "workspace" "viewer")]
{::ev/name "copy-inspect-code" (st/emit! (ptk/event ::ev/event
:type markup-type})))) {::ev/name "copy-inspect-code"
::ev/origin origin
:type markup-type})))))
on-style-copied on-style-copied
(mf/use-callback (mf/use-fn
(mf/deps style-type) (mf/deps style-type)
(fn [] (fn []
(st/emit! (ptk/event ::ev/event (let [origin (if (= :workspace from) "workspace" "viewer")]
{::ev/name "copy-inspect-style" (st/emit! (ptk/event ::ev/event
:type style-type})))) {::ev/name "copy-inspect-style"
::ev/origin origin
:type style-type})))))
{on-markup-pointer-down :on-pointer-down {on-markup-pointer-down :on-pointer-down
on-markup-lost-pointer-capture :on-lost-pointer-capture on-markup-lost-pointer-capture :on-lost-pointer-capture

View file

@ -40,16 +40,16 @@
(mf/defc right-sidebar (mf/defc right-sidebar
[{:keys [frame page objects file selected shapes page-id file-id share-id from on-change-section on-expand] [{:keys [frame page objects file selected shapes page-id file-id share-id from on-change-section on-expand]
:or {from :inspect}}] :or {from :viewer}}]
(let [section (mf/use-state :info #_:code) (let [section (mf/use-state :info #_:code)
objects (or objects (:objects page)) objects (or objects (:objects page))
shapes (or shapes shapes (or shapes
(resolve-shapes objects selected)) (resolve-shapes objects selected))
first-shape (first shapes) first-shape (first shapes)
page-id (or page-id (:id page)) page-id (or page-id (:id page))
file-id (or file-id (:id file)) file-id (or file-id (:id file))
libraries (get-libraries from) libraries (get-libraries from)
file (mf/deref refs/viewer-file) file (mf/deref refs/viewer-file)
components-v2 (dm/get-in file [:data :options :components-v2]) components-v2 (dm/get-in file [:data :options :components-v2])
@ -83,7 +83,7 @@
(handle-change-tab :info)))) (handle-change-tab :info))))
[:aside {:class (stl/css-case :settings-bar-right true [:aside {:class (stl/css-case :settings-bar-right true
:viewer-code (= from :inspect))} :viewer-code (= from :viewer))}
(if (seq shapes) (if (seq shapes)
[:div {:class (stl/css :tool-windows)} [:div {:class (stl/css :tool-windows)}
[:div {:class (stl/css :shape-row)} [:div {:class (stl/css :shape-row)}

View file

@ -104,7 +104,9 @@
{:on-change-tab on-change-tab {:on-change-tab on-change-tab
:selected section :selected section
:collapsable false :collapsable false
:content-class (stl/css-case :content-class true :inspect (= section :inspect)) :content-class (stl/css-case
:content-class true
:inspect (= section :inspect))
:header-class (stl/css :tab-spacing)} :header-class (stl/css :tab-spacing)}
[:& tab-element {:id :design [:& tab-element {:id :design
:title (tr "workspace.options.design")} :title (tr "workspace.options.design")}