diff --git a/org/channel-tui-main.org b/org/channel-tui-main.org
index d23ebb5..158ce35 100644
--- a/org/channel-tui-main.org
+++ b/org/channel-tui-main.org
@@ -880,6 +880,8 @@ Returns T on success, nil on failure. Does NOT wait or retry."
 (defvar *tty-in* nil "Stream from cat subprocess stdout (unused — direct stdin reads)")
 
 (defun tui-main ()
+  (format t "~&;; Passepartout TUI starting...~%")
+  (finish-output)
   (init-state)
   (load-history)
   (theme-load)