[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/dtache 28430fbff4 13/19: Add setting for active session
From: |
ELPA Syncer |
Subject: |
[elpa] externals/dtache 28430fbff4 13/19: Add setting for active session |
Date: |
Wed, 18 May 2022 12:57:37 -0400 (EDT) |
branch: externals/dtache
commit 28430fbff4832eb12d8d1d4a9c6d3ac829e90c2b
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>
Add setting for active session
---
dtache.el | 10 +++++++++-
1 file changed, 9 insertions(+), 1 deletion(-)
diff --git a/dtache.el b/dtache.el
index db18093ffe..2c925f35f0 100644
--- a/dtache.el
+++ b/dtache.el
@@ -121,6 +121,11 @@
:type 'integer
:group 'dtache)
+(defcustom dtache-open-active-session-action 'attach
+ "How to open an active session, allowed values are `attach' and `tail'."
+ :type 'symbol
+ :group 'dtache)
+
(defcustom dtache-shell-command-session-action
'(:attach dtache-shell-command-attach-session
:view dtache-view-dwim
@@ -341,7 +346,10 @@ Optionally SUPPRESS-OUTPUT if prefix-argument is provided."
(list (dtache-completing-read (dtache-get-sessions))))
(when (dtache-valid-session session)
(if (eq 'active (dtache--session-state session))
- (dtache-attach-session session)
+ (pcase dtache-open-active-session-action
+ ('attach (dtache-attach-session session))
+ ('tail (dtache-tail-session session))
+ (_ (message "`dtache-open-active-session-action' has an incorrect
value")))
(if-let ((view-fun (plist-get (dtache--session-action session) :view)))
(funcall view-fun session)
(dtache-view-dwim session)))))
- [elpa] externals/dtache updated (08310ca70b -> 02651e47d3), ELPA Syncer, 2022/05/18
- [elpa] externals/dtache e3193146b4 06/19: Improve initialization of packages, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache b5abeb8368 09/19: Add hidden source to dtache-consult, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache e034da8f30 10/19: Remove redundant dtache-setup, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 28430fbff4 13/19: Add setting for active session,
ELPA Syncer <=
- [elpa] externals/dtache dc740b1b43 03/19: Address require in vterm, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 3103ee6118 08/19: Update indentation, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 4e7387bbe0 04/19: Add dtache-vterm-mode, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 34f5111023 11/19: Rename dtache-setup, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 6c51554e69 01/19: Improve package configuration, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 5a5b3f5db3 02/19: Fix names, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 24ceed0282 12/19: Improve dtache-init, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 34f39efa36 14/19: Add string when attaching, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 6fa1fafb96 15/19: Add integration with embark, ELPA Syncer, 2022/05/18
- [elpa] externals/dtache 8d2ea557c0 16/19: Conditionally enable log mode when diffing, ELPA Syncer, 2022/05/18