diff --git a/CHANGELOG b/CHANGELOG index b84a9a5..e7a591e 100644 --- a/CHANGELOG +++ b/CHANGELOG @@ -1,4 +1,9 @@ # -*- mode: org -*- +* v0.7.1 UNRELEASED + +- Added a workaround for ~emoji.el~ from Emacs 29.1 calling an internal + function using an outdated number of arguments. #288 + * v0.7.0 2024-06-18 - Added new macro ~transient-augment-suffix~, which can be used to diff --git a/lisp/transient.el b/lisp/transient.el index e692880..a81b424 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -1078,7 +1078,10 @@ commands are aliases for." (and val (not (eq val 'transient--default-infix-command)) val))) (eval-and-compile ;transient--expand-define-args - (defun transient--expand-define-args (args arglist form &optional nobody) + (defun transient--expand-define-args (args &optional arglist form nobody) + ;; ARGLIST and FORM are only optional for backward compatibility. + ;; This is necessary because "emoji.el" from Emacs 29 calls this + ;; function directly, with just one argument. (unless (listp arglist) (error "Mandatory ARGLIST is missing")) (let (class keys suffixes docstr declare (interactive-only t))