From 96a9de8c19bdf4f6ef4a05a2be81f5f4cacc6b95 Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Tue, 9 Jan 2024 19:38:01 +0100 Subject: Depend on Emacs 27.1 Emacs 27.1 is widely available on all major Linux distributions, including the ones with long time support. --- exwm-input.el | 18 ++++-------------- 1 file changed, 4 insertions(+), 14 deletions(-) (limited to 'exwm-input.el') diff --git a/exwm-input.el b/exwm-input.el index 5767f139782d..b4d6d28b213b 100644 --- a/exwm-input.el +++ b/exwm-input.el @@ -587,20 +587,10 @@ instead." (when (called-interactively-p 'any) (exwm-input--update-global-prefix-keys))) -;; Putting (t . EVENT) into `unread-command-events' does not really work -;; as documented for Emacs < 26.2. -(eval-and-compile - (if (or (< emacs-major-version 26) - (and (= emacs-major-version 26) - (< emacs-minor-version 2))) - (defsubst exwm-input--unread-event (event) - (declare (indent defun)) - (setq unread-command-events - (append unread-command-events (list event)))) - (defsubst exwm-input--unread-event (event) - (declare (indent defun)) - (setq unread-command-events - (append unread-command-events `((t . ,event))))))) +(defsubst exwm-input--unread-event (event) + (declare (indent defun)) + (setq unread-command-events + (append unread-command-events `((t . ,event))))) (defun exwm-input--mimic-read-event (event) "Process EVENT as if it were returned by `read-event'." -- cgit 1.4.1