procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Minor improvement in textsec diagnostics

Browse source 
* lisp/international/textsec.el (textsec-suspicious-nonspacing-p):
Clarify wording of the strings returned to explain the suspicious
use of nonspacing characters.
This commit is contained in:
Eli Zaretskii 2022-01-19 10:57:03 +02:00
parent 46dcb07e98
commit 596d0bda6d
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/international/textsec.el
View file

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