branch: elpa/helm
commit 294e7a103fe10cb121c7849e3dd2dd17ab2b2d60
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Fix theme affixation with themes with no docstring
---
helm-mode.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/helm-mode.el b/helm-mode.el
index 1e271d2447..47b463ae93 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -1330,8 +1330,9 @@ is used."
(condition-case nil
(read (current-buffer))
(end-of-file nil)))
- (when (eq (car-safe it) 'deftheme)
- (cl-return (setq doc (car (split-string (nth 2 it) "\n"))))))
+ (let ((docstring (nth 2 it)))
+ (when (and (eq (car-safe it) 'deftheme) docstring)
+ (cl-return (setq doc (car (split-string docstring "\n")))))))
(unless doc
(setq doc (helm--get-theme-doc-from-header)))))
doc))
