branch: externals/crdt
commit f81f5297fa866ed102b01c33dde091d5ff8d4108
Author: Qiantan Hong <qh...@alum.mit.edu>
Commit: Qiantan Hong <qh...@alum.mit.edu>
Improve naming for user and buffer list
---
crdt.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/crdt.el b/crdt.el
index 7a40e0a95f..67d252bdcd 100644
--- a/crdt.el
+++ b/crdt.el
@@ -831,8 +831,7 @@ Directly return the buffer network name under point if in
the buffer menu."
(error "Not a CRDT shared buffer"))
(unless (and (crdt--session-buffer-menu-buffer crdt--session)
(buffer-live-p (crdt--session-buffer-menu-buffer crdt--session)))
(setf (crdt--session-buffer-menu-buffer crdt--session)
- (generate-new-buffer (concat (crdt--session-name crdt--session)
- " buffers")))
+ (generate-new-buffer (format "*CRDT Buffers %s*"
(crdt--session-name crdt--session))))
(crdt--assimilate-session (crdt--session-buffer-menu-buffer
crdt--session)))
(let ((display-buffer (crdt--session-buffer-menu-buffer crdt--session)))
(crdt-refresh-buffers display-buffer)
@@ -949,7 +948,7 @@ Only server can perform this action."
(error "Not a CRDT shared buffer"))
(unless (and (crdt--session-user-menu-buffer crdt--session)
(buffer-live-p (crdt--session-user-menu-buffer crdt--session)))
(setf (crdt--session-user-menu-buffer crdt--session)
- (generate-new-buffer (concat (crdt--session-name crdt--session)
" users")))
+ (generate-new-buffer (format "*CRDT Users %s*"
(crdt--session-name crdt--session))))
(crdt--assimilate-session (crdt--session-user-menu-buffer
crdt--session)))
(let ((display-buffer (crdt--session-user-menu-buffer crdt--session)))
(crdt-refresh-users display-buffer)
