[elpa] master 913086b 1/5: Don't crash when Emacs runs as a daemon

[Artur Malabarba]

branch: master
commit 913086bd366e0a34e19b9b68655135382aaa96b7
Author: Damien Cassou <address@hidden>
Commit: Damien Cassou <address@hidden>

    Don't crash when Emacs runs as a daemon
    
    When `beacon--color-range` is executed while Emacs daemon is starting,
    `color-values` returns `nil` and `beacon--color-range` was crashing.
    This patch fixes the problem by making the function return an empty
    color range instead.
---
 beacon.el |    7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/beacon.el b/beacon.el
index 9a3edac..93e6646 100644
--- a/beacon.el
+++ b/beacon.el
@@ -280,9 +280,10 @@ Only returns `beacon-size' elements."
                        (color-distance "white" bg)))
                (make-list 3 (* beacon-color 65535)))
               (t (make-list 3 (* (- 1 beacon-color) 65535))))))
-    (apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b))
-           (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt bg 
n))))
-                   [0 1 2]))))
+    (when bg
+      (apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b))
+             (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt 
bg n))))
+                     [0 1 2])))))
 
 
 ;;; Blinking