Easy key bindings for your Reagent application.
You might have a sweet menus, but power users will want keyboard shortcuts!
Add this to your project dependencies:
Include the keyboard-listener component in your document:
(defn main-page []
[:div
[:h1 "Page title"]
[:span "Some content"]
[kb/keyboard-listener]]) ; <-------
Now you can add key bindings as easily as adding a new component :
[kb/kb-action "ctrl-a" #(prn "Print this cool message!")]
You can also automatically overwrite a key binding by mounting another component :
[kb/kb-action "ctrl-a" #(prn "initial shortcut overwritten!")]
When the component is unmounted, any previous key binding is restored. This allows you to temporarily give the users new shortcuts without all the hassle.
Key binding actions control whether the browser's default behavior is
suppressed: if the action function returns a truthy value,
.preventDefault is called; if it returns nil or false, the
default browser action is allowed to proceed.
This lets you conditionally opt out. For example, to let ctrl-c
fall through to native clipboard copy when text is selected:
[kb/kb-action "ctrl-c" (fn []
(if (has-text-selection?)
nil ;; let browser handle it
(do (copy-objects!) :handled)))]
Because key bindings often implies a more 'serious' web application, we disable the following browser shortcuts automatically (if allowed by the browser), regardless of action return values:
ctrl-r We don't want the user to reload by accident;ctrl-s Don't save the HTML file.You can override this behavior by clearing the preventing-default-keys atom.
It's possible to completely deactivate all the key bindings by
mounting the deactivate-kb-shortcuts component.
A typical use is with a modal in which the user needs to type text in a field.
You can access the keyboard state with the Reagent ratom
keyboard-state. The map contains the 3 main modifiers state
(shift, ctrl and alt) and the character keycode for the normal
key pressed.
Copyright © 2023 Christian Fortin
Distributed under the Eclipse Public License either version 1.0 or (at your option) any later version.
Can you improve this documentation?Edit on GitHub
cljdoc builds & hosts documentation for Clojure/Script libraries
| Ctrl+k | Jump to recent docs |
| ← | Move to previous article |
| → | Move to next article |
| Ctrl+/ | Jump to the search field |