From 52a9aaaa2533eda7d17e6029192d23cd5d86cad2 Mon Sep 17 00:00:00 2001 From: Curiosidad-Racional Date: Wed, 2 Dec 2020 08:21:37 +0100 Subject: [PATCH] Fix `wrong-type-argument symbolp` Not only symbols can be found in key bindings. --- objed.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/objed.el b/objed.el index 48f7b55..7fd915b 100644 --- a/objed.el +++ b/objed.el @@ -1340,7 +1340,9 @@ See `objed-cmd-alist'." "Return non-nil when any self insertion key is rebound." (cl-dolist (char (string-to-list "abcdefghijklmnopqrstuvwxyz")) (let ((binding (key-binding (vector char)))) - (when (not (string-match "insert" (symbol-name binding))) + (when (not (and + (symbolp binding) + (string-match "insert" (symbol-name binding)))) (cl-return binding))))) (defun objed-init-p ()