From: Dave Love <fx@gnu.org>
Date: Sun, 18 Aug 2002 13:37:11 +0000 (+0000)
Subject: (ruler-mode-character-validate): Use characterp.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~438
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ab2cbf678bd4d9fca4a289d22812a24fa3f90e5d;p=emacs.git

(ruler-mode-character-validate): Use characterp.
---

diff --git a/lisp/ruler-mode.el b/lisp/ruler-mode.el
index 840934f1693..be30afd7861 100644
--- a/lisp/ruler-mode.el
+++ b/lisp/ruler-mode.el
@@ -123,8 +123,7 @@ or remove a tab stop.  \\[ruler-mode-toggle-show-tab-stops] or
   "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))))