From 39a9a3d7f298678365bfaf3d96058d5d5ccecb90 Mon Sep 17 00:00:00 2001 From: Amr Gharbeia Date: Thu, 14 May 2026 13:24:19 -0400 Subject: [PATCH] fix: remove :force t from cl-tty quickload (causes slow startup) The :force t forces recompilation of cl-tty and all its dependencies (including ironclad) on every run, making startup take 30+ seconds. Without :force t, quickload uses timestamp-based caching. If cl-tty source changes, delete ~/.cache/common-lisp manually. --- passepartout | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/passepartout b/passepartout index 079a76e..d049eaf 100755 --- a/passepartout +++ b/passepartout @@ -386,7 +386,7 @@ case "$COMMAND" in (load (merge-pathnames "quicklisp/setup.lisp" (user-homedir-pathname))) (declaim (optimize (debug 3) (speed 0) (safety 3))) (push (truename "$PASSEPARTOUT_DATA_DIR/") asdf:*central-registry*) -(ql:quickload :cl-tty :silent t :force t) +(ql:quickload :cl-tty :silent t) (ql:quickload :passepartout :silent t) (let ((dir (pathname (format nil "~a/lisp/" (truename "$PASSEPARTOUT_DATA_DIR"))))) (dolist (f '("channel-tui-state" "channel-tui-view" "channel-tui-main"))