changeset 89490:db33d6285e97

(keypad-setup): Use characterp.
author Dave Love <fx@gnu.org>
date Wed, 10 Sep 2003 17:52:28 +0000
parents 6afa33e621d8
children af0933fdc21a
files lisp/emulation/keypad.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/keypad.el	Wed Sep 10 17:52:03 2003 +0000
+++ b/lisp/emulation/keypad.el	Wed Sep 10 17:52:28 2003 +0000
@@ -233,7 +233,7 @@
 	 (bind
 	  (cond
 	   ((or (eq setup 'numeric)
-		(char-valid-p setup))
+		(characterp setup))
 	    (if (eq decimal 'numeric)
 		(setq decimal nil))
 	    (vector (or decimal ?.) ?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9))