File: hmouse-mod.el.html
This is presently not used because Emacs binds Control and Meta
mouse keys which interfere with this mode. To make this work,
Hyperbole will first have to unbind those mouse keys before
invoking this mode.
----
This defines a single minor mode, hmouse-mod-mode (Hmouse
Modifier mode) which makes the Action Mouse Key operate as a
Control- modifier key and the Assist Mouse Key operate as a Meta-
modifier key.
If the Action Key is held down while alpha characters are typed,
they are translated into Control keys instead. The Assist
Key translates them into Meta keys. When both Smart Keys
are depressed, Control-Meta keys are produced. The commands bound
to the characters produced are then run.
So the Smart Keys modify the keys typed, e.g. Action Key + {a}
runs the function for {C-a}.
If no keys are typed while the Smart Keys are down, they operate as
normally under Hyperbole.
This module is for balancing keypress energy across both hands to
reduce carpal tunnel stress. It may also be used with a chord keyboard
in one hand and a mouse in the other to point at things and
operate upon them simultaneously.
It requires that Hyperbole be loaded in order to work. Hyperbole
defines two Smart Keys, the Action Key and the Assist Key, on the
shift-middle and shift-right buttons by default. Use (hmouse-install
t) to add an additional Action Key Key on the middle mouse button.
TO INVOKE:
{C-u M-x hmouse-mod-mode RET} or in Lisp: (hmouse-mod-mode 1)
TO QUIT:
{C-u 0 M-x hmouse-mod-mode RET} or in Lisp: (hmouse-mod-mode 0)
TO TOGGLE ON AND OFF:
{M-x hmouse-mod-mode RET} or in Lisp: (hmouse-mod-mode 'toggle)
Defined variables (5)
hmouse-mod--global-map | Global key map installed by ‘hmouse-mod-enable’ function. |
hmouse-mod--prefix | Prefix key part of current key sequence. |
hmouse-mod--prior-global-map | The global keymap prior to enabling of ‘hmouse-mod-mode’. |
hmouse-mod-mode | Non-nil if Hmouse-Mod mode is enabled. |
hmouse-mod-mode-hook | Hook run after entering or leaving ‘hmouse-mod-mode’. |
Defined functions (7)
hmouse-mod-disable | () |
hmouse-mod-enable | () |
hmouse-mod-execute-command | (KEY COUNT) |
hmouse-mod-insert-command | (COUNT) |
hmouse-mod-keyboard-quit | () |
hmouse-mod-last-char | () |
hmouse-mod-mode | (&optional ARG) |