[elpa] externals/diminish d5c61a14e1 13/22: allow to diminish to :eval expressions

[ELPA Syncer]

branch: externals/diminish
commit d5c61a14e1a5590a65f83c099a5bd42fcadff24d
Author: DK <beerandhot@gmail.com>
Commit: Martin Yrjölä <martin.yrjola@gmail.com>

    allow to diminish to :eval expressions
---
 diminish.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/diminish.el b/diminish.el
index 2954114a9d..6aa45e4c89 100644
--- a/diminish.el
+++ b/diminish.el
@@ -178,7 +178,8 @@ to TO-WHAT if it's > 1 char long & doesn't already begin 
with a space."
   (let ((minor (assq mode minor-mode-alist)))
     (when minor
         (progn (callf or to-what "")
-               (when (> (length to-what) 1)
+               (when (and (stringp to-what)
+                          (> (length to-what) 1))
                  (or (= (string-to-char to-what) ?\ )
                      (callf2 concat " " to-what)))
                (or (assq mode diminished-mode-alist)