[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/eat 918aaa3593: ; eat.el (eat-default-shell,eat-tramp-shel
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/eat 918aaa3593: ; eat.el (eat-default-shell,eat-tramp-shells): Fix |
Date: |
Sun, 4 Feb 2024 00:59:23 -0500 (EST) |
branch: elpa/eat
commit 918aaa359375d0108b2e27d5fa5bf71de8a8c53d
Author: Akib Azmain Turja <akib@disroot.org>
Commit: Akib Azmain Turja <akib@disroot.org>
; eat.el (eat-default-shell,eat-tramp-shells): Fix
---
eat.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/eat.el b/eat.el
index 2dd436d67e..3ffbedab39 100644
--- a/eat.el
+++ b/eat.el
@@ -131,11 +131,11 @@
:type 'string
:group 'eat-ui)
-(defcustom eat-tramp-shells '(("docker" "/bin/sh"))
+(defcustom eat-tramp-shells '(("docker" . "/bin/sh"))
"Alist specifying the shells to run in Tramp.
-Each element of form (TRAMP-METHOD SHELL), where SHELL corresponds to
-the default shell for remote directories using TRAMP-METHOD."
+Each element of form (TRAMP-METHOD . SHELL), where SHELL corresponds
+to the default shell for remote directories using TRAMP-METHOD."
:type '(alist :key-type string :value-type string)
:group 'eat-ui)
@@ -7069,7 +7069,7 @@ PROGRAM."
"Return a shell to run."
(or (and (file-remote-p default-directory)
(with-parsed-tramp-file-name default-directory nil
- (alist-get method eat-tramp-shells)))
+ (alist-get method eat-tramp-shells nil nil 'equal)))
eat-shell))
(defun eat--1 (program arg display-buffer-fn)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/eat 918aaa3593: ; eat.el (eat-default-shell,eat-tramp-shells): Fix,
ELPA Syncer <=