Function: hmouse-mod-insert-command
hmouse-mod-insert-command is an interactive and byte-compiled function
defined in hmouse-mod.el.
Signature
(hmouse-mod-insert-command COUNT)
Documentation
Surrogate function for self-insert-command.
Accounts for modifier Smart Keys. COUNT is used as a prefix argument to the command.
Key Bindings
Source Code
;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hmouse-mod.el
(defun hmouse-mod-insert-command (count)
"Surrogate function for `self-insert-command'.
Accounts for modifier Smart Keys. COUNT is used as a prefix
argument to the command."
(interactive "p")
(if (and (boundp 'action-key-depressed-flag)
(boundp 'assist-key-depressed-flag))
(let (
;; (modifiers (event-modifiers last-command-event))
(c (hmouse-mod-last-char)))
(cond ((and c action-key-depressed-flag assist-key-depressed-flag)
(setq action-key-cancelled t
assist-key-cancelled t)
;; Control-Meta keys
(hmouse-mod-execute-command
(vector (list 'control 'meta c)) count))
((and c action-key-depressed-flag)
(setq action-key-cancelled t)
;; Emulate Control keys
(hmouse-mod-execute-command
(vector (list 'control c)) count))
((and c assist-key-depressed-flag)
(setq assist-key-cancelled t)
;; Emulate Meta keys
(hmouse-mod-execute-command
(vector (list 'meta c)) count))
((null c))
(t (self-insert-command count))))
(self-insert-command count))
(discard-input)
(setq this-command 'self-insert-command))