From e328f99d1e065879d442a3c95558c7193e91c297 Mon Sep 17 00:00:00 2001 From: Conor Nash Date: Sat, 10 Oct 2026 13:36:14 +0100 Subject: [PATCH] Shorten Unix management REPL test socket path --- tests/management-repl-tests.lisp | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/tests/management-repl-tests.lisp b/tests/management-repl-tests.lisp index 278180dd..8e26c878 100644 --- a/tests/management-repl-tests.lisp +++ b/tests/management-repl-tests.lisp @@ -157,10 +157,9 @@ (-> management-repl-tests--unix-lifecycle () null) (defun management-repl-tests--unix-lifecycle () "Drive the Unix management transport through its application lifecycle." - (let* ((root (uiop:ensure-directory-pathname - (merge-pathnames - (format nil "management-unix-~A/" (make-identifier)) - (uiop:temporary-directory)))) + ;; A short MKDTEMP root keeps the socket path within the 104-byte macOS + ;; limit below the long per-user TMPDIR. + (let* ((root (test-make-temporary-root)) (configuration (management-repl-test-configuration root)) (token "test-management-token") (application (make-instance 'application :configuration configuration))