From: John Wiegley Date: Thu, 30 Nov 2017 00:48:58 +0000 (-0800) Subject: Use backquote rather than quote X-Git-Tag: emacs-29.0.90~1306^2~15^2~228 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6a62122e9c;p=emacs.git Use backquote rather than quote --- diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el index 07bc2a2a777..c651316ce3c 100644 --- a/lisp/use-package/use-package.el +++ b/lisp/use-package/use-package.el @@ -1026,7 +1026,7 @@ If RECURSED is non-nil, recurse into sublists." (function (lambda () ...))" (pcase v ((pred use-package--non-nil-symbolp) t) - (`(,(or 'quote 'function) + (`(,(or `quote `function) ,(pred use-package--non-nil-symbolp)) t) ((pred functionp) t) (`(function (lambda . ,_)) t) @@ -1039,7 +1039,7 @@ If RECURSED is non-nil, recurse into sublists." #'(lambda () ...)" (pcase v ((pred use-package--non-nil-symbolp) v) - (`(,(or 'quote 'function) + (`(,(or `quote `function) ,(and sym (pred use-package--non-nil-symbolp))) sym) (`(lambda . ,_) v) (`(quote ,(and lam `(lambda . ,_))) lam)