maciej/counsel-projectile
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

cp-switch-project: Add projectile-dired action

Browse source
This commit is contained in:
Eric Danan 2018-08-26 16:07:42 +02:00
parent ea12b29e7e
commit d53ddd591c
2 changed files with 8 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
README.md
View file

@ -116,6 +116,7 @@ This command is a replacement for `projectile-switch-project`. It adds the possi
| <kbd>o</kbd> | Jump to a project buffer or file: call `counsel-projectile` (default action; see above) | | <kbd>o</kbd> | Jump to a project buffer or file: call `counsel-projectile` (default action; see above) |
| <kbd>f</kbd> | Jump to a project file: call `counsel-projectile-find-file` (see below) | | <kbd>f</kbd> | Jump to a project file: call `counsel-projectile-find-file` (see below) |
| <kbd>d</kbd> | Jump to a project directory: call `counsel-projectile-find-dir` (see below) | | <kbd>d</kbd> | Jump to a project directory: call `counsel-projectile-find-dir` (see below) |
| <kbd>D</kbd> | Open project in dired |
| <kbd>b</kbd> | Jump to a project buffer: call `counsel-projectile-switch-to-buffer` (see below) | | <kbd>b</kbd> | Jump to a project buffer: call `counsel-projectile-switch-to-buffer` (see below) |
| <kbd>m</kbd> | Find file manually: call `counsel-find-file` from the project root | | <kbd>m</kbd> | Find file manually: call `counsel-find-file` from the project root |
| <kbd>S</kbd> | Save all project buffers | | <kbd>S</kbd> | Save all project buffers |

7
counsel-projectile.el
View file

@ -1051,6 +1051,8 @@ candidates list of `counsel-projectile-switch-project'."
"jump to a project file") "jump to a project file")
("d" counsel-projectile-switch-project-action-find-dir ("d" counsel-projectile-switch-project-action-find-dir
"jump to a project directory") "jump to a project directory")
("D" counsel-projectile-switch-project-action-dired
"open project in dired")
("b" counsel-projectile-switch-project-action-switch-to-buffer ("b" counsel-projectile-switch-project-action-switch-to-buffer
"jump to a project buffer") "jump to a project buffer")
("m" counsel-projectile-switch-project-action-find-file-manually ("m" counsel-projectile-switch-project-action-find-file-manually
@ -1144,6 +1146,11 @@ action."
(counsel-projectile-find-dir ivy-current-prefix-arg)))) (counsel-projectile-find-dir ivy-current-prefix-arg))))
(counsel-projectile-switch-project-by-name project))) (counsel-projectile-switch-project-by-name project)))
(defun counsel-projectile-switch-project-action-dired (project)
"Open `dired' at PROJECT root."
(let ((projectile-switch-project-action 'projectile-dired))
(counsel-projectile-switch-project-by-name project)))
(defun counsel-projectile-switch-project-action-switch-to-buffer (project) (defun counsel-projectile-switch-project-action-switch-to-buffer (project)
"Jump to a buffer in PROJECT." "Jump to a buffer in PROJECT."
(let ((projectile-switch-project-action 'counsel-projectile-switch-to-buffer)) (let ((projectile-switch-project-action 'counsel-projectile-switch-to-buffer))