Make helm-persp-switch-project inherit helm actions

Make helm-persp-switch-project have the same helm actions that helm-projectil-switch-project has. Fixes syl20bnr#5596
honkhonkhonk · Mar 26, 2016 · e78ece5 · e78ece5
1 parent a9c9e9a
commit e78ece5
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 1 deletion.
diff --git a/layers/+distribution/spacemacs-base/packages.el b/layers/+distribution/spacemacs-base/packages.el
@@ -815,6 +815,7 @@ below. Anything else exits."
     :config
     (progn
       (projectile-global-mode)
+      (helm-projectile-on)
       (spacemacs|hide-lighter projectile-mode))))
 
 (defun spacemacs-base/init-quelpa ())

diff --git a/layers/+spacemacs/spacemacs-layouts/funcs.el b/layers/+spacemacs/spacemacs-layouts/funcs.el
@@ -326,13 +326,20 @@ perspectives does."
                        (projectile-relevant-known-projects))
                projectile-known-projects))
      :fuzzy-match helm-projectile-fuzzy-match
+     :keymap helm-projectile-projects-map
      :mode-line helm-read-file-name-mode-line-string
      :action '(("Switch to Project Perspective" .
                 (lambda (project)
                   (let ((persp-reset-windows-on-nil-window-conf t))
                     (persp-switch project)
                     (let ((projectile-completion-system 'helm))
-                      (projectile-switch-project-by-name project)))))))
+                      (projectile-switch-project-by-name project)))))
+               ("Open project root in vc-dir or magit `M-g'" . helm-projectile-vc)
+               ("Switch to Eshell `M-e'" . helm-projectile-switch-to-eshell)
+               ("Grep in projects `C-s'" . helm-projectile-grep)
+               ("Compile project `M-c'. With C-u, new compile command"
+                . helm-projectile-compile-project)
+               ("Remove project(s) `M-D'" . helm-projectile-remove-known-project)))
    :buffer "*Helm Projectile Layouts*"))