From c83beec07895b9d591dab4c89c3b900ecb254a05 Mon Sep 17 00:00:00 2001
From: cage <cage@invalid>
Date: Sat, 2 Dec 2023 17:21:13 +0100
Subject: [PATCH] - prevented opening another connection in a callback
 contained in 'status-tree->text'.

---
 src/ui-goodies.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ui-goodies.lisp b/src/ui-goodies.lisp
index ae7dd5d..f82675a 100644
--- a/src/ui-goodies.lisp
+++ b/src/ui-goodies.lisp
@@ -1007,7 +1007,7 @@ It an existing file path is provided the command will refuse to run."
                            (folder           (thread-window:timeline-folder *thread-window*))
                            (status-id        (actual-author-message-id selected-message)))
                    (with-enqueued-process ()
-                     (db-utils:with-ready-database (:connect t)
+                     (db-utils:with-ready-database (:connect nil)
                        (let* ((tree (db:message-id->tree timeline folder status-id)))
                          (print-tree tree)
                          (when (string-not-empty-p file)