[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/embark 5b56203a45: Fix bug using act-all on file select
From: |
ELPA Syncer |
Subject: |
[elpa] externals/embark 5b56203a45: Fix bug using act-all on file selection with // or /~/ paths |
Date: |
Tue, 1 Aug 2023 18:57:45 -0400 (EDT) |
branch: externals/embark
commit 5b56203a4511e434ee5c200f90775f0ea6d0c94b
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>
Fix bug using act-all on file selection with // or /~/ paths
Another spot where we need to enforce Emacs's reduction of // and /~/
in paths. Have I found them all? I need a more systematic approach to
this.
---
embark.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/embark.el b/embark.el
index 1ca4bd54ec..eb1b056163 100644
--- a/embark.el
+++ b/embark.el
@@ -2132,7 +2132,7 @@ target bounds.
In the minibuffer only the first target finder returning non-nil
is taken into account. When finding targets at point in other
-buffers, all target finder function is executed.
+buffers, all target finder functions are executed.
For each target, the type is then looked up as a key in the
variable `embark-transformer-alist'. If there is a transformer
@@ -2319,8 +2319,10 @@ Return a plist with keys `:type', `:orig-type',
`:candidates', and
(let ((dir (embark--default-directory)))
(setq candidates
(mapcar (lambda (cand)
- (abbreviate-file-name (expand-file-name cand dir)))
+ (abbreviate-file-name
+ (expand-file-name (substitute-in-file-name cand)
dir)))
candidates))))
+ ;; TODO more systematic approach to applying substitute-in-file-name
(append
(list :orig-type type :orig-candidates candidates :bounds bounds)
(or (when candidates
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/embark 5b56203a45: Fix bug using act-all on file selection with // or /~/ paths,
ELPA Syncer <=