[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 2d8751a: project buffers: Check default directo
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 2d8751a: project buffers: Check default directory instead of buffer-file-name (Fix #357) |
Date: |
Sat, 10 Jul 2021 18:57:06 -0400 (EDT) |
branch: externals/consult
commit 2d8751a5a73d36da7550c06ae5ca67fe12520bcf
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
project buffers: Check default directory instead of buffer-file-name (Fix
#357)
---
consult.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/consult.el b/consult.el
index 8769127..e3f13b4 100644
--- a/consult.el
+++ b/consult.el
@@ -3507,10 +3507,12 @@ If NORECORD is non-nil, do not record the buffer switch
in the buffer list."
,(lambda ()
(when-let (root (consult--project-root))
(mapcar #'buffer-name
- (seq-filter (lambda (x)
- (when-let (file (buffer-file-name x))
- (string-prefix-p root file)))
- (consult--cached-buffers))))))
+ (seq-filter
+ (lambda (x)
+ (string-prefix-p
+ root
+ (expand-file-name (buffer-local-value 'default-directory
x))))
+ (consult--cached-buffers))))))
"Project buffer candidate source for `consult-buffer'.")
(defvar consult--source-project-file
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/consult 2d8751a: project buffers: Check default directory instead of buffer-file-name (Fix #357),
ELPA Syncer <=