3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-30 01:57:21 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Improve dashboard accessibility

Browse source
This commit is contained in:
Eva 2022-11-28 08:44:19 +01:00
parent 2ce36ce052
commit 7045496a39
28 changed files with 761 additions and 283 deletions
Download patch file Download diff file Expand all files Collapse all files

19
frontend/src/app/main/ui/components/link.cljs
View file

@ -9,12 +9,13 @@
[app.util.keyboard :as kbd]
[rumext.v2 :as mf]))
(mf/defc link [{:keys [action name klass data-test]}]
[:a {:on-click action
:klass klass
:on-key-down (fn [event]
(when (kbd/enter? event)
(action event)))
:tabindex "0"
:data-test data-test}
name])
(mf/defc link [{:keys [action klass data-test keyboard-action children]}]
(let [keyboard-action (or keyboard-action action)]
[:a {:on-click action
:class klass
:on-key-down (fn [event]
(when (kbd/enter? event)
(keyboard-action event)))
:tab-index "0"
:data-test data-test}
[:* children]]))