[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/detached 33d31b1619 17/22: Add command to open session
From: |
ELPA Syncer |
Subject: |
[elpa] externals/detached 33d31b1619 17/22: Add command to open session log file in dired |
Date: |
Mon, 30 May 2022 10:57:32 -0400 (EDT) |
branch: externals/detached
commit 33d31b1619787077a279d05d9c0c8a4f8c30f1c7
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>
Add command to open session log file in dired
---
detached-init.el | 2 ++
detached.el | 11 +++++++++++
2 files changed, 13 insertions(+)
diff --git a/detached-init.el b/detached-init.el
index b6bcda7543..6576c918fc 100644
--- a/detached-init.el
+++ b/detached-init.el
@@ -31,6 +31,7 @@
(declare-function detached-compile-session "detached")
(declare-function detached-delete-session "detached")
(declare-function detached-insert-session-command "detached")
+(declare-function detached-open-session-directory "detached")
(declare-function detached-kill-session "detached")
(declare-function detached-rerun-session "detached")
(declare-function detached-tail-session "detached")
@@ -78,6 +79,7 @@
(define-key map "c" #'detached-compile-session)
(define-key map "d" #'detached-delete-session)
(define-key map "i" #'detached-insert-session-command)
+ (define-key map "f" #'detached-open-session-directory)
(define-key map "k" #'detached-kill-session)
(define-key map "r" #'detached-rerun-session)
(define-key map "t" #'detached-tail-session)
diff --git a/detached.el b/detached.el
index 0ce5e93223..4f76cef42c 100644
--- a/detached.el
+++ b/detached.el
@@ -520,6 +520,17 @@ Optionally DELETE the session if prefix-argument is
provided."
(detached-log-mode)))
(ediff-buffers buffer1 buffer2))))
+;;;###autoload
+(defun detached-open-session-directory (session)
+ "Open SESSION's log directory."
+ (interactive
+ (list (detached-completing-read (detached-get-sessions))))
+ (let* ((file-path
+ (detached--session-file session 'log))
+ (tramp-verbose 1))
+ (when (file-exists-p file-path)
+ (dired-jump-other-window file-path))))
+
;;;###autoload
(defun detached-detach-session ()
"Detach from session in current buffer.
- [elpa] externals/detached e55cf27103 14/22: Remove detached-env file, (continued)
- [elpa] externals/detached e55cf27103 14/22: Remove detached-env file, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 200da6a619 08/22: Fix broken tests, ELPA Syncer, 2022/05/30
- [elpa] externals/detached f3ee65f6c9 15/22: Rename env-mode to env, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 532f2030c2 16/22: Update broken test, ELPA Syncer, 2022/05/30
- [elpa] externals/detached bae90a13dd 22/22: Remove unnecessary with-connection-local-variables, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 10cf120383 19/22: Bug fix: Address bugs in detached--db-directory-event, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 3feae45d28 04/22: Add success check in detached.el, ELPA Syncer, 2022/05/30
- [elpa] externals/detached cfe69e4978 09/22: Add detached-terminal-data-command, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 636c273039 11/22: Update README, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 0224d2961a 13/22: Update message-filter function, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 33d31b1619 17/22: Add command to open session log file in dired,
ELPA Syncer <=
- [elpa] externals/detached 6ea2bb38c6 18/22: Update CHANGELOG, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 950b1533ab 21/22: Update name of database file, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 8cbfca00bd 20/22: Improve support for multiple Emacs sessions, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 5fba6790f6 05/22: Update detached message on failure, ELPA Syncer, 2022/05/30
- [elpa] externals/detached 006a715e11 12/22: Update CHANGELOG, ELPA Syncer, 2022/05/30