From 0353da8dd7f78179a721f42cec4df8c23f0908f2 Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Sat, 5 Dec 2015 18:03:20 +0000 Subject: [PATCH] Try again to fix the case of no bg color --- beacon.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/beacon.el b/beacon.el index c0bb43fb4..4d4e58b2d 100644 --- a/beacon.el +++ b/beacon.el @@ -262,7 +262,8 @@ Only returns `beacon-size' elements." (forward-char -1))) (background-color-at-point)) (face-background 'default))) - (bg (color-values (if (string-match "\\`unspecified-" default-bg) + (bg (color-values (if (or (not (stringp default-bg)) + (string-match "\\`unspecified-" default-bg)) (face-attribute 'beacon-fallback-background :background) default-bg))) (fg (cond -- 2.39.2