[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/buffer-expose 3077932 4/6: Merge branch 'master' of htt
From: |
Clemens Radermacher |
Subject: |
[elpa] externals/buffer-expose 3077932 4/6: Merge branch 'master' of https://github.com/d125q/buffer-expose into d125q-master |
Date: |
Tue, 23 Apr 2019 08:52:50 -0400 (EDT) |
branch: externals/buffer-expose
commit 30779328d5c131fd6bbf9a487c9b7b52108c016a
Merge: 1e1f1d0 4f83d85
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>
Merge branch 'master' of https://github.com/d125q/buffer-expose into
d125q-master
---
buffer-expose.el | 39 +++++++++++++++++++++++++++++++++++++++
1 file changed, 39 insertions(+)
diff --git a/buffer-expose.el b/buffer-expose.el
index 444b35c..f344ba0 100644
--- a/buffer-expose.el
+++ b/buffer-expose.el
@@ -416,6 +416,14 @@ corresponds to the number of buffers in
(when (eq mode (buffer-local-value 'major-mode buf))
(push buf bufs)))))
+(defun buffer-expose--get-project-buffers ()
+ "Get all buffers from `projectile-project-buffers'."
+ (if (not (require 'projectile nil t))
+ (user-error "Projectile not found")
+ (if (not (projectile-project-root))
+ (user-error "Not in project")
+ (projectile-project-buffers))))
+
;; * Grid
(defun buffer-expose--other-window ()
@@ -808,6 +816,37 @@ show per page, which defaults to
`buffer-expose-max-num-windows'."
(eq (buffer-local-value 'major-mode buf)
'dired-mode))))
+
+(defun buffer-expose-project (&optional max)
+ "Expose buffers of `projectile-project-buffers'.
+
+If MAX is given it determines the maximum number of windows to
+show per page, which defaults to `buffer-expose-max-num-windows'."
+ (interactive "P")
+ (buffer-expose-show-buffers
+ (buffer-expose--get-project-buffers) max))
+
+
+(defun buffer-expose-project-stars (&optional max)
+ "Expose *special* buffers of `projectile-project-buffers'.
+
+If MAX is given it determines the maximum number of windows to
+show per page, which defaults to `buffer-expose-max-num-windows'."
+ (interactive "P")
+ (buffer-expose-show-buffers
+ (buffer-expose--get-project-buffers) max '("\\`[^*]")))
+
+
+(defun buffer-expose-project-no-stars (&optional max)
+ "Expose buffers of `projectile-project-buffers' omitting *special* ones.
+
+If MAX is given it determines the maximum number of windows to
+show per page, which defaults to `buffer-expose-max-num-windows'."
+ (interactive "P")
+ (buffer-expose-show-buffers
+ (buffer-expose--get-project-buffers) max '("\\`\\*")))
+
+
;; * Grid navigation
- [elpa] externals/buffer-expose updated (9ed95a4 -> 9869be1), Clemens Radermacher, 2019/04/23
- [elpa] externals/buffer-expose 4f83d85 1/6: Add Projectile support, Clemens Radermacher, 2019/04/23
- [elpa] externals/buffer-expose 9869be1 6/6: Version bump, Clemens Radermacher, 2019/04/23
- [elpa] externals/buffer-expose 3077932 4/6: Merge branch 'master' of https://github.com/d125q/buffer-expose into d125q-master,
Clemens Radermacher <=
- [elpa] externals/buffer-expose 1e1f1d0 3/6: Merge branch '10sr-nongraphical', Clemens Radermacher, 2019/04/23
- [elpa] externals/buffer-expose 0d6b5e6 2/6: Make it work in non-graphical environment, Clemens Radermacher, 2019/04/23
- [elpa] externals/buffer-expose 476331e 5/6: Don't set initial values of optional deps, Clemens Radermacher, 2019/04/23