From 2c6e38f32d16ac513525ac1d5a0a0fda3d90275c Mon Sep 17 00:00:00 2001 From: Amr Gharbeia Date: Mon, 18 May 2026 14:26:56 -0400 Subject: [PATCH] v0.8.0: force initial redraw before entering input loop Add explicit (redraw be w h) call before the main loop so the TUI renders immediately on startup, without waiting for the first 100ms input poll cycle to complete. --- org/channel-tui-main.org | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/org/channel-tui-main.org b/org/channel-tui-main.org index 158ce35..3de7e7c 100644 --- a/org/channel-tui-main.org +++ b/org/channel-tui-main.org @@ -923,8 +923,10 @@ Returns T on success, nil on failure. Does NOT wait or retry." (loop while (and (st :running) (not (st :connected))) do (connect-daemon) (unless (st :connected) (sleep 5)))) - :name "daemon-auto-connect")) - (loop while (st :running) do + :name "daemon-auto-connect")) + ;; Force initial render before entering input loop + (redraw be w h) + (loop while (st :running) do (dolist (ev (drain-queue)) (cond ((eq (getf ev :type) :daemon)