branch: elpa/tablist
commit 41a9612f51bad36d6689667c11f42f8143103bb2
Merge: 8079801 bd0d2bf
Author: politza <poli...@fh-trier.de>
Commit: GitHub <nore...@github.com>
Merge pull request #14 from jaor/jaor-patch-1
Use car-safe when iterating model-line-misc-info.
---
tablist.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/tablist.el b/tablist.el
index 51728a8..fa22a2b 100644
--- a/tablist.el
+++ b/tablist.el
@@ -309,7 +309,7 @@ as argument for the function `completion-in-region'.")
(defun tablist-init (&optional disable)
(let ((cleaned-misc (cl-remove 'tablist-current-filter
- mode-line-misc-info :key 'car)))
+ mode-line-misc-info :key #'car-safe)))
(cond
((not disable)
(set (make-local-variable 'mode-line-misc-info)
