From 97443772e0967cbcfdb5e7f7a650256c7ea8b83e Mon Sep 17 00:00:00 2001 From: Dave Love Date: Wed, 10 Sep 2003 17:53:50 +0000 Subject: [PATCH] (edmacro-parse-keys): Use characterp. --- lisp/edmacro.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/edmacro.el b/lisp/edmacro.el index 4ec62152db5..68e9f40a10f 100644 --- a/lisp/edmacro.el +++ b/lisp/edmacro.el @@ -717,7 +717,7 @@ If START or END is negative, it counts from the end." (setq res (edmacro-subseq res 2 -2))) (if (and (not need-vector) (loop for ch across res - always (and (char-valid-p ch) + always (and (characterp ch) (let ((ch2 (logand ch (lognot ?\M-\^@)))) (and (>= ch2 0) (<= ch2 127)))))) (concat (loop for ch across res -- 2.39.2