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

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

[elpa] externals/crdt 810af7e 32/80: fix bug when beg/end are markers in


From: ELPA Syncer
Subject: [elpa] externals/crdt 810af7e 32/80: fix bug when beg/end are markers in crdt--*-change
Date: Sat, 28 Aug 2021 10:57:36 -0400 (EDT)

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

    fix bug when beg/end are markers in crdt--*-change
---
 crdt.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/crdt.el b/crdt.el
index e819d35..8d18c85 100644
--- a/crdt.el
+++ b/crdt.el
@@ -831,6 +831,10 @@ Start the search from POS."
     (setq crdt--changed-string (buffer-substring beg end))))
 
 (defun crdt--after-change (beg end length)
+  (when (markerp beg)
+    (setq beg (marker-position beg)))
+  (when (markerp end)
+    (setq end (marker-position end)))
   (mapc (lambda (ov)
           (when (eq (overlay-get ov 'category) 'crdt-pseudo-cursor)
             (crdt--move-cursor ov beg)))



reply via email to

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