[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/detached 1d9e4bc541 3/3: Fix bug in attach functions
From: |
ELPA Syncer |
Subject: |
[elpa] externals/detached 1d9e4bc541 3/3: Fix bug in attach functions |
Date: |
Fri, 18 Nov 2022 04:57:36 -0500 (EST) |
branch: externals/detached
commit 1d9e4bc541ce8f27aa1fa75e48855dcae8010315
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>
Fix bug in attach functions
---
detached-compile.el | 3 ++-
detached.el | 1 +
2 files changed, 3 insertions(+), 1 deletion(-)
diff --git a/detached-compile.el b/detached-compile.el
index fefc3648eb..78a94b2066 100644
--- a/detached-compile.el
+++ b/detached-compile.el
@@ -88,7 +88,8 @@ Optionally EDIT-COMMAND."
"Attach to SESSION with `compile'."
(when (detached-valid-session session)
(detached-with-session session
- (let* ((detached-enabled t))
+ (let* ((detached-enabled t)
+ (detached-session-mode 'attached))
(compilation-start `(,detached-session-command))))))
;;;###autoload
diff --git a/detached.el b/detached.el
index 3c948cd13e..479f1fdc17 100644
--- a/detached.el
+++ b/detached.el
@@ -913,6 +913,7 @@ This function uses the `notifications' library."
(let* ((inhibit-message t))
(detached-with-session session
(cl-letf* (((symbol-function #'set-process-sentinel) #'ignore)
+ (detached-session-mode 'attached)
(buffer (get-buffer-create detached--shell-command-buffer))
(default-directory (detached-session-directory session))
(command (detached-session-attach-command session :type
'string)))