From: Eli Zaretskii <eliz@gnu.org>
Date: Wed, 19 Jan 2022 08:57:03 +0000 (+0200)
Subject: Minor improvement in textsec diagnostics
X-Git-Tag: emacs-29.0.90~2952
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=596d0bda6da8b8c9092bc3778738912c7bdfc544;p=emacs.git

Minor improvement in textsec diagnostics

* lisp/international/textsec.el (textsec-suspicious-nonspacing-p):
Clarify wording of the strings returned to explain the suspicious
use of nonspacing characters.
---

diff --git a/lisp/international/textsec.el b/lisp/international/textsec.el
index c1be5364a9a..524052d49d7 100644
--- a/lisp/international/textsec.el
+++ b/lisp/international/textsec.el
@@ -304,13 +304,13 @@ consecutive nonspacing characters."
                       '(Cf Cc Mn))))
            (when (and nonspacing
                       (equal char prev))
-             (throw 'found "Two identical nonspacing characters in a row"))
+             (throw 'found "Two identical consecutive nonspacing characters"))
            (setq nonspace-count (if nonspacing
                                     (1+ nonspace-count)
                                   0))
            (when (> nonspace-count 4)
              (throw 'found
-                    "Excessive number of nonspacing characters in a row"))
+                    "Too many consecutive nonspacing characters"))
            (setq prev char)))
        string)
       nil)))