1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-08-13 23:56:45 +02:00

Improve performance of button-link component

This commit is contained in:
Andrey Antukh 2023-07-13 15:39:18 +02:00
commit b5dac770d3

View file

@ -9,13 +9,18 @@
[app.util.keyboard :as kbd] [app.util.keyboard :as kbd]
[rumext.v2 :as mf])) [rumext.v2 :as mf]))
(mf/defc button-link [{:keys [action icon name klass]}] (mf/defc button-link
{::mf/wrap-props false}
[{:keys [action icon name klass]}]
(let [on-key-down (mf/use-fn
(mf/deps action)
(fn [event]
(when (kbd/enter? event)
(action event))))]
[:a.btn-primary.btn-large.button-link [:a.btn-primary.btn-large.button-link
{:class klass {:class klass
:tab-index "0" :tab-index "0"
:on-click action :on-click action
:on-key-down (fn [event] :on-key-down on-key-down}
(when (kbd/enter? event)
(action event)))}
[:span.logo icon] [:span.logo icon]
name]) name]))