cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-01-31 04:24:48 +01:00
Code Issues

- made scheduled updating of chat messages happening only when a chat

Browse Source 
window is shown

  This changes should make the  program more responsive when scrolling
  the text of the main window.
This commit is contained in:
cage 2020-12-31 11:54:40 +01:00
parent e9e4071132
commit b8d7af915c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/scheduled-events.lisp
View File

@ -37,8 +37,8 @@
(gen-scheduler-function (refresh-refresh-all-chats-messages
+refresh-all-chats-messages-frequency+)
(ui:update-all-chats-messages)
(when (message-window:display-chat-p *message-window*)
(ui:update-all-chats-messages)
(let ((show-event (make-instance 'program-events:chat-show-event
:chat (message-window:metadata *message-window*))))
(program-events:push-event show-event))))