[elpa] externals/spinner 4b33526 3/7: Fix #1 - Don't assume mode-line-process is a list

[Stefan Monnier]

branch: externals/spinner
commit 4b335260edcdd8dcee0811d7048bb08274e941f1
Author: Artur Malabarba <artur@endlessparentheses.com>
Commit: Artur Malabarba <artur@endlessparentheses.com>

    Fix #1 - Don't assume mode-line-process is a list
---
 spinner.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/spinner.el b/spinner.el
index b227eba..42c2998 100644
--- a/spinner.el
+++ b/spinner.el
@@ -301,7 +301,8 @@ this time, in which case it won't display at all."
       (setq spinner-current (make-spinner type-or-object (current-buffer) fps 
delay)))
     (setq type-or-object spinner-current)
     ;; Maybe add to mode-line.
-    (unless (memq 'spinner--mode-line-construct mode-line-process)
+    (unless (and (listp mode-line-process)
+                 (memq 'spinner--mode-line-construct mode-line-process))
       (setq mode-line-process
             (list (or mode-line-process "")
                   'spinner--mode-line-construct))))