From: Noam Postavsky Date: Tue, 16 Apr 2013 15:29:32 +0000 (-0400) Subject: needed extra layer of nesting for diminish calls X-Git-Tag: emacs-29.0.90~1306^2~15^2~456^2 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0df0e18c4b;p=emacs.git needed extra layer of nesting for diminish calls --- diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el index 17f7309cf55..82868731cb5 100644 --- a/lisp/use-package/use-package.el +++ b/lisp/use-package/use-package.el @@ -457,12 +457,12 @@ For full documentation. please see commentary. (ignore-errors ,@(cond ((stringp diminish-var) - `(diminish (quote ,(intern (concat name-string "-mode"))) - ,diminish-var)) + `((diminish (quote ,(intern (concat name-string "-mode"))) + ,diminish-var))) ((symbolp diminish-var) - `(diminish (quote ,diminish-var))) + `((diminish (quote ,diminish-var)))) ((and (consp diminish-var) (stringp (cdr diminish-var))) - `(diminish (quote ,(car diminish-var)) ,(cdr diminish-var))) + `((diminish (quote ,(car diminish-var)) ,(cdr diminish-var)))) (t ; list of symbols or (symbol . "string") pairs (mapcar (lambda (var) (if (listp var)