From 6a942b61100cb8c4081085e512499743ee8793d3 Mon Sep 17 00:00:00 2001 From: cage Date: Fri, 25 Feb 2022 12:21:45 +0100 Subject: [PATCH] - fixed positioning of message-window when resizing terminal in gemini mode. --- src/windows.lisp | 30 +++++++++++++++++++++--------- 1 file changed, 21 insertions(+), 9 deletions(-) diff --git a/src/windows.lisp b/src/windows.lisp index 7aef4c9..59c0f02 100644 --- a/src/windows.lisp +++ b/src/windows.lisp @@ -343,15 +343,27 @@ height, position and so on)" (draw window)))) (defun refresh-config-all () - (refresh-config *main-window*) - (refresh-config *thread-window*) - (refresh-config *message-window*) - (refresh-config *tags-window*) - (refresh-config *conversations-window*) - (refresh-config *command-window*) - (refresh-config *send-message-window*) - (refresh-config *chats-list-window*) - (refresh-config *gemini-toc-window*)) + (if command-line:*gemini-full-screen-mode* + (progn + (refresh-config *main-window*) + (refresh-config *gemini-toc-window*) + (refresh-config *thread-window*) + (refresh-config *message-window*) + (refresh-config *tags-window*) + (refresh-config *conversations-window*) + (refresh-config *command-window*) + (refresh-config *send-message-window*) + (refresh-config *chats-list-window*)) + (progn + (refresh-config *main-window*) + (refresh-config *thread-window*) + (refresh-config *message-window*) + (refresh-config *tags-window*) + (refresh-config *conversations-window*) + (refresh-config *command-window*) + (refresh-config *send-message-window*) + (refresh-config *chats-list-window*) + (refresh-config *gemini-toc-window*)))) (defun cursor-show () (setf (cursor-visible-p (croatoan-window *main-window*)) t))