Mercurial > emacs
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))))