From a604e877cd1f8096f8c428c88c5b960307c12f85 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 22 Jan 2022 12:14:17 +0200 Subject: [PATCH] ; Fix last change in 'textsec-bidi-controls-suspicious-p'. --- lisp/international/textsec.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/international/textsec.el b/lisp/international/textsec.el index adef64bfdf0..6985f4f3efe 100644 --- a/lisp/international/textsec.el +++ b/lisp/international/textsec.el @@ -301,7 +301,9 @@ affected by bidi controls in STRING." ;; state at end of STRING which could then affect the following ;; text. (insert string "a1א:!") - (bidi-find-overridden-directionality 1 (point-max) nil))) + (let ((pos (bidi-find-overridden-directionality 1 (point-max) nil))) + (and (fixnump pos) + (1- pos))))) (defun textsec-name-suspicious-p (name) "Say whether NAME looks suspicious. -- 2.39.5