diff options
| author | Stefan Monnier | 2023-01-21 08:51:54 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2023-03-19 14:51:27 -0400 |
| commit | 3748c8a62e80e9bbd41fb307e5a4b1ec84e642b9 (patch) | |
| tree | 84eac2560bc02d9b286255260992ace21bd1090d | |
| parent | de81349bd898a2c26f9ae15ed967484c7475646f (diff) | |
| download | emacs-3748c8a62e80e9bbd41fb307e5a4b1ec84e642b9.tar.gz emacs-3748c8a62e80e9bbd41fb307e5a4b1ec84e642b9.zip | |
(textsec-bidi-controls-suspicious-p): Minor tweak
* lisp/international/textsec.el (textsec-bidi-controls-suspicious-p):
Don't assume point-min==1 (and point-min is marginally more
efficient, to boot).
| -rw-r--r-- | lisp/international/textsec.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/textsec.el b/lisp/international/textsec.el index 1540f806e3b..e69e7c19842 100644 --- a/lisp/international/textsec.el +++ b/lisp/international/textsec.el | |||
| @@ -320,7 +320,8 @@ affected by bidi controls in STRING." | |||
| 320 | ;; state at end of STRING which could then affect the following | 320 | ;; state at end of STRING which could then affect the following |
| 321 | ;; text. | 321 | ;; text. |
| 322 | (insert string "a1א:!") | 322 | (insert string "a1א:!") |
| 323 | (let ((pos (bidi-find-overridden-directionality 1 (point-max) nil))) | 323 | (let ((pos (bidi-find-overridden-directionality |
| 324 | (point-min) (point-max) nil))) | ||
| 324 | (and (fixnump pos) | 325 | (and (fixnump pos) |
| 325 | (1- pos))))) | 326 | (1- pos))))) |
| 326 | 327 | ||