Add basic dashboard pom and test

This commit is contained in:
Eva Marco 2024-05-08 17:30:47 +02:00
parent 99371234dc
commit d341cef406
9 changed files with 214 additions and 1 deletions

View file

@ -12,7 +12,7 @@
(mf/defc link
{::mf/wrap-props false}
[{:keys [action class data-test keyboard-action children]}]
[{:keys [action class data-test keyboard-action children data-testid]}]
(let [keyboard-action (d/nilv keyboard-action action)]
[:a {:on-click action
:class class
@ -20,5 +20,6 @@
(when ^boolean (kbd/enter? event)
(keyboard-action event)))
:tab-index "0"
:data-testid data-testid
:data-test data-test}
children]))

View file

@ -783,6 +783,7 @@
[:li {:class (stl/css-case :current drafts?
:sidebar-nav-item true)}
[:& link {:action go-drafts
:data-testid "drafts-link-sidebar"
:class (stl/css :sidebar-link)
:keyboard-action go-drafts-with-key}
[:span {:class (stl/css :element-title)} (tr "labels.drafts")]]]