diff options
| author | Philipp Stephani <phst@google.com> | 2021-05-18 09:25:54 +0200 |
|---|---|---|
| committer | Philipp Stephani <phst@google.com> | 2021-05-18 09:26:49 +0200 |
| commit | 9676d41b8301b84e07717e633059a3f2b5c4c9d8 (patch) | |
| tree | 6000b716da6d4ae6e444c2b5f716c24386d642e1 /lisp/emacs-lisp | |
| parent | 7124598068ed267c34e1d70b49361f499fc31c9f (diff) | |
| download | emacs-9676d41b8301b84e07717e633059a3f2b5c4c9d8.tar.gz emacs-9676d41b8301b84e07717e633059a3f2b5c4c9d8.tar.bz2 emacs-9676d41b8301b84e07717e633059a3f2b5c4c9d8.zip | |
* lisp/emacs-lisp/subr-x.el (if-let): Swap &or branches (Bug#48489)
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/subr-x.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el index 5a8885c0427..fb890509ad7 100644 --- a/lisp/emacs-lisp/subr-x.el +++ b/lisp/emacs-lisp/subr-x.el @@ -174,8 +174,8 @@ As a special case, interprets a SPEC of the form \(SYMBOL SOMETHING) like \((SYMBOL SOMETHING)). This exists for backward compatibility with an old syntax that accepted only one binding." (declare (indent 2) - (debug ([&or (&rest [&or symbolp (symbolp form) (form)]) - (symbolp form)] + (debug ([&or (symbolp form) ; must be first, Bug#48489 + (&rest [&or symbolp (symbolp form) (form)])] form body))) (when (and (<= (length spec) 2) (not (listp (car spec)))) |