changeset 88997:71bcf52caa3b

(ruler-mode-character-validate): Use characterp.
author Dave Love <fx@gnu.org>
date Sun, 18 Aug 2002 13:37:11 +0000
parents fe13096d1829
children ef8a864d950c
files lisp/ruler-mode.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ruler-mode.el	Sun Aug 18 13:34:52 2002 +0000
+++ b/lisp/ruler-mode.el	Sun Aug 18 13:37:11 2002 +0000
@@ -123,8 +123,7 @@
   "Ensure WIDGET value is a valid character value."
   (save-excursion
     (let ((value (widget-value widget)))
-      (if (char-valid-p value)
-          nil
+      (unless (characterp value)
         (widget-put widget :error
                     (format "Invalid character value: %S" value))
         widget))))