cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-01-05 01:26:59 +01:00
Code Issues

- [gemini] prevented repainting of the message-window if not needed when streaming gemini text from the net.

Browse Source
This commit is contained in:
cage 2021-06-20 13:04:47 +02:00
parent f4b92f92f2
commit 4c950d9052
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/program-events.lisp
View File

@ -1157,7 +1157,12 @@
(not (skip-rendering-p object))
(message-window:display-gemini-text-p win))
(refresh-gemini-message-window links source ir-line append-text)
(windows:draw win))))))
(multiple-value-bind (x start length)
(message-window:visible-rows win)
(declare (ignore x))
(when (< (+ start length)
(windows:win-height-no-border win))
(windows:draw win))))))))
(defclass gemini-abort-downloading-event (program-event) ())