branch: externals/crdt
commit efdafb9954a5d22f141055d3e52806ff1d0afa78
Author: Qiantan Hong <qh...@mit.edu>
Commit: Qiantan Hong <qh...@mit.edu>
fix bug on emacs 25
---
crdt.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/crdt.el b/crdt.el
index 50fde7f..21278ef 100644
--- a/crdt.el
+++ b/crdt.el
@@ -1301,7 +1301,8 @@ Handle received STRING from PROCESS."
(unless (and (process-buffer process)
(buffer-live-p (process-buffer process)))
(set-process-buffer process (generate-new-buffer "*crdt-server*"))
- (set-marker (process-mark process) 1))
+ (with-current-buffer (process-buffer process)
+ (set-marker (process-mark process) 1)))
(with-current-buffer (process-buffer process)
(unless crdt--session
(setq crdt--session (process-get process 'crdt-session)))
