diff options
| author | Po Lu <luangruo@yahoo.com> | 2022-04-07 21:16:11 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2022-04-07 21:16:11 +0800 |
| commit | 3b411417086ceb2ce3838160d01c6f250e47bbf3 (patch) | |
| tree | 7605008be2090be2cc58ba6df8df6c2d22b8184e /doc/lispref/commands.texi | |
| parent | c1a6aa0c3eb1029e3f7f5c3b227d7952bee775b8 (diff) | |
| download | emacs-3b411417086ceb2ce3838160d01c6f250e47bbf3.tar.gz emacs-3b411417086ceb2ce3838160d01c6f250e47bbf3.tar.bz2 emacs-3b411417086ceb2ce3838160d01c6f250e47bbf3.zip | |
Expose the name of an event's input device to Lisp
This name can be used to identify the device for special
treatment, i.e. only interpolating scrolls coming from mice and
not touchpads inside pixel-scroll-precision-mode.
* doc/lispref/commands.texi (Command Loop Info): Document new
variable `last-event-device'.
* etc/NEWS: Announce new variable `last-event-device'.
* src/frame.h (struct frame): New field `last_mouse_device'.
* src/keyboard.c (read_char): Clear last-event-device.
(kbd_buffer_get_event): Set last-event-device to the event's
recorded device.
(init_keyboard): Clear last-event-device.
(syms_of_keyboard): New defvar `last-event-device'.
* src/termhooks.h (struct input_event): New field `device'.
(EVENT_INIT): Set it to the special value `Qt' by default.
* src/xterm.c (x_init_master_valuators): Record the device's
name.
(x_dnd_begin_drag_and_drop): Only preserve last event device if
the mouse ended up in the source frame.
(x_note_mouse_movement): New argument `source'.
(handle_one_xevent): Set input event sources whenever
appropriate.
(mark_xterm): Mark device names.
* src/xterm.h (struct xi_device_t): New field `name'.
Diffstat (limited to 'doc/lispref/commands.texi')
| -rw-r--r-- | doc/lispref/commands.texi | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/doc/lispref/commands.texi b/doc/lispref/commands.texi index a4ae68af5b2..74bf0f48692 100644 --- a/doc/lispref/commands.texi +++ b/doc/lispref/commands.texi @@ -1127,6 +1127,20 @@ frame, the value is the frame to which the event was redirected. If the last event came from a keyboard macro, the value is @code{macro}. @end defvar +@defvar last-event-device +This variable records the name of the input device from which the last +input event read was generated. It is @code{nil} if no such device +exists, i.e., the last input event was read from +@code{unread-command-events}, or it came from a keyboard macro. + +When the X Input Extension is being used on X Windows, the device name +is a string that is unique to each physical keyboard, pointing device +and touchscreen attached to the X server. Otherwise, it is either the +string @samp{"Virtual core pointer"} or @samp{"Virtual core +keyboard"}, depending on whether the event was generated by a pointing +device (such as a mouse) or a keyboard. +@end defvar + @node Adjusting Point @section Adjusting Point After Commands @cindex adjusting point |