diff options
Diffstat (limited to 'lisp/international/textsec.el')
-rw-r--r-- | lisp/international/textsec.el | 4 |
1 files changed, 3 insertions, 1 deletions
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. |