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

- [gemini] prevent gemlog window to lose focus when a gemlog is selected.

Browse Source 
- made gemlog window close when focus passes to thread window.
This commit is contained in:
cage 2021-01-11 19:14:53 +01:00
parent 848cd45954
commit ad33ca61df
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/ui-goodies.lisp
View File

@ -400,7 +400,9 @@ Metadata includes:
*message-window*
*follow-requests-window*)
(when-window-shown (*chats-list-window*)
(close-chats-list-window)))
(close-chats-list-window))
(when-window-shown (*gemini-subscription-window*)
(close-gemlog-window)))
(gen-focus-to-window message-window
*message-window*
@ -1264,8 +1266,7 @@ certificate).
:title (db:row-title fields)
:subtitle (db:row-subtitle fields)
:entries entries)))
(program-events:push-event event)
(focus-to-message-window))))
(program-events:push-event event))))
(defun gemlog-refresh-all ()
(with-blocking-notify-procedure ((_ "updating gemlog's subscriptions"))