Fix: (ement-room--buffer) Set room's buffer slot before returning

Fixes #34.  Thanks to @akater for reporting.
This commit is contained in:
Adam Porter 2021-08-26 20:58:47 -05:00
parent e989a449b6
commit 19abf8363a

View file

@ -1521,8 +1521,13 @@ data slot."
(setf (map-elt (ement-room-local room) 'buffer) nil))
nil 'local)
(setq-local bookmark-make-record-function #'ement-room-bookmark-make-record)
;; Clear new-events, because those only matter when a buffer is already open.
(setf (alist-get 'new-events (ement-room-local room)) nil)
(setf
;; Clear new-events, because those only matter when a buffer is already open.
(alist-get 'new-events (ement-room-local room)) nil
;; Set the new buffer in the room's local alist so that it
;; can be used by event-inserting functions before this
;; function returns, e.g. `ement-room--add-member-face'.
(alist-get 'buffer (ement-room-local room)) new-buffer)
;; We don't use `ement-room--insert-events' to avoid extra
;; calls to `ement-room--insert-ts-headers'.
(ement-room--handle-events (ement-room-state room))