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

1 files changed, 3 insertions, 2 deletions

diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el
index a1beca1fc05..f6c437d5728 100644
--- a/lisp/use-package/use-package.el
+++ b/lisp/use-package/use-package.el
@@ -41,6 +41,7 @@
 
 (require 'bind-key)
 (require 'bytecomp)
+(require 'cl-lib)
 (eval-when-compile (require 'cl))
 (eval-when-compile (require 'regexp-opt))
 
@@ -1426,7 +1427,7 @@ deferred until the prefix key sequence is pressed."
            (or (symbolp k)
                (and (listp k)
                     (listp (cdr k))
-                    (seq-every-p #'symbolp k))))
+                    (cl-every #'symbolp k))))
        #'(lambda (v)
            (or (symbolp v) (functionp v)))
        name label arg))))
@@ -1452,7 +1453,7 @@ deferred until the prefix key sequence is pressed."
         (let ((syms (car def))
               (fun (cdr def)))
           (mapcar
-           #'(lambda (sym) 
+           #'(lambda (sym)
                `(add-hook (quote ,(intern (format "%s-hook" sym)))
                           (function ,fun)))
            (if (symbolp syms) (list syms) syms)))) args))))