emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master dd0bc52: Fix an error in 'highlight-confusing-reorderings'


From: Eli Zaretskii
Subject: master dd0bc52: Fix an error in 'highlight-confusing-reorderings'
Date: Sat, 6 Nov 2021 13:15:03 -0400 (EDT)

branch: master
commit dd0bc520145718888252611792fe53cae648531b
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    Fix an error in 'highlight-confusing-reorderings'
    
    * lisp/international/mule-cmds.el
    (highlight-confusing-reorderings): Don't signal an error when
    a confusingly-reordered sequence ends at EOB.
---
 lisp/international/mule-cmds.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 91219ca..d36d878 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -3338,9 +3338,11 @@ or the active region if that is set."
                    (re-search-backward reorder-starters nil t)))
                 (finish
                  (save-excursion
-                   (re-search-forward reorder-enders nil t))))
+                   (let ((fin (re-search-forward reorder-enders nil t)))
+                     (if fin (1- fin)
+                       (point-max))))))
             (with-silent-modifications
-              (add-text-properties start (1- finish)
+              (add-text-properties start finish
                                    '(font-lock-face
                                      confusingly-reordered
                                      face confusingly-reordered



reply via email to

[Prev in Thread] Current Thread [Next in Thread]