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 17f7309cf55a04dc6222ecc4519c32e77a373f69..82868731cb58f829d323fbff05255012ed689040 100644 (file)
--- 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)