Fix narf/get-buffers (to only return current-wg buffers)
This commit is contained in:
parent
1c80d928e8
commit
098dc9ba21
1 changed files with 2 additions and 1 deletions
|
@ -41,7 +41,8 @@ Inspired from http://demonastery.org/2013/04/emacs-evil-narrow-region/"
|
||||||
|
|
||||||
If PROJECT-P is non-nil, get all buffers in current workgroup
|
If PROJECT-P is non-nil, get all buffers in current workgroup
|
||||||
If both are non-nil, get all project buffers across all workgroups"
|
If both are non-nil, get all project buffers across all workgroups"
|
||||||
(let ((buffers (buffer-list))
|
(let* ((assocbuf (wg-workgroup-associated-buffers nil))
|
||||||
|
(buffers (--filter (memq it assocbuf) (buffer-list)))
|
||||||
project-root)
|
project-root)
|
||||||
(if (and project-p (setq project-root (narf/project-root t)))
|
(if (and project-p (setq project-root (narf/project-root t)))
|
||||||
(funcall (if (eq project-p 'not) '-remove '-filter)
|
(funcall (if (eq project-p 'not) '-remove '-filter)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue