mirror of
https://github.com/masscollaborationlabs/emacs.git
synced 2025-07-05 19:59:38 +00:00
Require cl-lib and do not use seq functions
cl-lib is also required for a separate call to cl-mapcan. Fixes https://github.com/jwiegley/use-package/issues/520
This commit is contained in:
parent
b7041c0f29
commit
4303a2faf6
1 changed files with 3 additions and 2 deletions
|
@ -41,6 +41,7 @@
|
||||||
|
|
||||||
(require 'bind-key)
|
(require 'bind-key)
|
||||||
(require 'bytecomp)
|
(require 'bytecomp)
|
||||||
|
(require 'cl-lib)
|
||||||
(eval-when-compile (require 'cl))
|
(eval-when-compile (require 'cl))
|
||||||
(eval-when-compile (require 'regexp-opt))
|
(eval-when-compile (require 'regexp-opt))
|
||||||
|
|
||||||
|
@ -1426,7 +1427,7 @@ deferred until the prefix key sequence is pressed."
|
||||||
(or (symbolp k)
|
(or (symbolp k)
|
||||||
(and (listp k)
|
(and (listp k)
|
||||||
(listp (cdr k))
|
(listp (cdr k))
|
||||||
(seq-every-p #'symbolp k))))
|
(cl-every #'symbolp k))))
|
||||||
#'(lambda (v)
|
#'(lambda (v)
|
||||||
(or (symbolp v) (functionp v)))
|
(or (symbolp v) (functionp v)))
|
||||||
name label arg))))
|
name label arg))))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue