From ab2cbf678bd4d9fca4a289d22812a24fa3f90e5d Mon Sep 17 00:00:00 2001
From: Dave Love <fx@gnu.org>
Date: Sun, 18 Aug 2002 13:37:11 +0000
Subject: [PATCH] (ruler-mode-character-validate): Use characterp.

---
 lisp/ruler-mode.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

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))))
-- 
2.39.2