From: Dave Love <fx@gnu.org>
Date: Wed, 10 Sep 2003 17:53:50 +0000 (+0000)
Subject: (edmacro-parse-keys): Use characterp.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1855
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=97443772e0967cbcfdb5e7f7a650256c7ea8b83e;p=emacs.git

(edmacro-parse-keys): Use characterp.
---

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