From 0df0e18c4be912133220c14c4999fccbc92cb52c Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Tue, 16 Apr 2013 11:29:32 -0400 Subject: [PATCH] needed extra layer of nesting for diminish calls --- lisp/use-package/use-package.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) 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) -- 2.39.2