branch: externals/crdt
commit 709059ff5e0846f2c8f44b479e6083c6d0128dc8
Author: Qiantan Hong <qh...@mit.edu>
Commit: Qiantan Hong <qh...@mit.edu>
fix disconnect warn condition
---
crdt.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/crdt.el b/crdt.el
index 58b9c89464..a7b8c65532 100644
--- a/crdt.el
+++ b/crdt.el
@@ -1941,7 +1941,7 @@ Setup up the server with PASSWORD and assign this Emacs
DISPLAY-NAME."
(kill-buffer process-buffer))
(when (and proxy-process (process-live-p proxy-process))
(interrupt-process proxy-process)))
- (unless (memq last-command '(crdt-disconnect crdt-stop-session))
+ (unless (memq this-command '(crdt-disconnect crdt-stop-session
crdt--stop-session))
(warn "CRDT session %s disconnected." (crdt--session-name session)))))
(defun crdt-stop-session (&optional session)
