# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1029677692 0
# Node ID fe13096d182978dc555e3ba63f87ff07b24cf8b3
# Parent  ef6383763076b8288ad74da8c04ad3add76fb741
(character): Use characterp.

diff -r ef6383763076 -r fe13096d1829 lisp/wid-edit.el
--- a/lisp/wid-edit.el	Sun Aug 18 13:32:42 2002 +0000
+++ b/lisp/wid-edit.el	Sun Aug 18 13:34:52 2002 +0000
@@ -3187,7 +3187,7 @@
 			   (aref value 0)
 			 value))
   :match (lambda (widget value)
-	   (char-valid-p value)))
+	   (characterp value)))
 
 (define-widget 'list 'group
   "A Lisp list."