emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/crdt 7c9d7ee 64/80: avoid spitting error when POSITION-


From: ELPA Syncer
Subject: [elpa] externals/crdt 7c9d7ee 64/80: avoid spitting error when POSITION-HINT out of range
Date: Sat, 28 Aug 2021 10:57:43 -0400 (EDT)

branch: externals/crdt
commit 7c9d7eea70623984615f83b0609a7681aea2680b
Author: Qiantan Hong <qhong@mit.edu>
Commit: Qiantan Hong <qhong@mit.edu>

    avoid spitting error when POSITION-HINT out of range
---
 crdt.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/crdt.el b/crdt.el
index c2d5fd5..6f35306 100644
--- a/crdt.el
+++ b/crdt.el
@@ -750,7 +750,7 @@ Start the search from POS."
   (let* ((left-pos (previous-single-property-change (min (1+ pos) (point-max))
                                                     'crdt-id nil (point-min)))
          (left-id (crdt--get-starting-id left-pos))
-         (right-pos (next-single-property-change pos 'crdt-id nil (point-max)))
+         (right-pos (next-single-property-change (min pos (point-max)) 
'crdt-id nil (point-max)))
          (right-id (crdt--get-starting-id right-pos))
          (moving-forward nil))
     (cl-macrolet ((move-forward ()



reply via email to

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