🐛 Fix shapes flyout in toolbar only opens with the space key, and doesn't close when pressed again

This commit is contained in:
Luis de Dios 2026-08-24 12:57:52 +02:00
parent 47d599fe34
commit b93837b433

View File

@ -149,16 +149,26 @@
on-main-key-down
(mf/use-fn
(mf/deps open)
(fn [event]
(cond
(kbd/space? event)
(and open (kbd/esc? event))
(reset! open* false)
(or (kbd/enter? event) (kbd/space? event))
(do
(dom/prevent-default event)
(if open
(reset! open* false)
(do
(cancel-timer! close-timer*)
(reset! open* true))))
(kbd/down-arrow? event)
(do
(dom/prevent-default event)
(cancel-timer! close-timer*)
(reset! open* true))
(and open (kbd/esc? event))
(reset! open* false))))
(reset! open* true)))))
on-flyout-key-down
(mf/use-fn
@ -218,7 +228,10 @@
:aria-expanded open
:has-tooltip false
:icon default-icon
:on-click on-select-tool
:on-click (fn [event]
(cancel-timer! open-timer*)
(cancel-timer! close-timer*)
(on-select-tool event))
:on-key-down on-main-key-down
:data-tool (name default-tool)}]