hiro/ement.el
1
0
Fork 0
mirror of https://github.com/vale981/ement.el synced 2025-03-05 09:21:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Tidy: (ement-room-retro-callback) Use buffer slot

Browse source
This commit is contained in:
Adam Porter 2021-07-25 16:08:12 -05:00
parent 9266157e89
commit d94fc4e039
1 changed files with 2 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
ement-room.el
View file

@ -390,12 +390,9 @@ the previously oldest event."
(declare-function ement--make-event "ement.el")
(defun ement-room-retro-callback (room data)
"Push new DATA to ROOM on SESSION and add events to room buffer."
(pcase-let* (((cl-struct ement-room) room)
(pcase-let* (((cl-struct ement-room local) room)
((map _start end chunk state) data)
;; FIXME: Use buffer slot in struct.
(buffer (cl-loop for buffer in (buffer-list)
when (eq room (buffer-local-value 'ement-room buffer))
return buffer)))
((map buffer) local))
;; Put the newly retrieved events at the end of the slots, because they should be
;; older events. But reverse them first, because we're using "dir=b", which the
;; spec says causes the events to be returned in reverse-chronological order, and we