[elpa] externals/ef-themes 37d7c1daa5 1/2: Reformat ef-themes--annotate-theme

[ELPA Syncer]

branch: externals/ef-themes
commit 37d7c1daa5eefab256f643a0c87327075e3b3c22
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Reformat ef-themes--annotate-theme
---
 ef-themes.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ef-themes.el b/ef-themes.el
index 8f4d6aa911..e2511d8016 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -553,9 +553,9 @@ overrides."
 
 (defun ef-themes--annotate-theme (theme)
   "Return completion annotation for THEME."
-  (let ((doc (get (intern theme) 'theme-documentation)))
-    (when doc ;; A completion annotation function may return nil
-      (concat " -- " (car (split-string doc "\\."))))))
+  (when-let ((symbol (intern-soft theme))
+             (doc-string (get symbol 'theme-documentation)))
+    (format " -- %s" (car (split-string doc-string "\\.")))))
 
 (defvar ef-themes--select-theme-history nil
   "Minibuffer history of `ef-themes--select-prompt'.")