spacemacs-layouts: fix creation of perspective with ivy

Fix #10240
This commit is contained in:
Muneeb Shaikh 2018-01-24 19:05:15 +05:30 committed by syl20bnr
parent 7b4042463f
commit 89933acbde

View file

@ -408,17 +408,24 @@ perspectives does."
;; Ivy integration
(defun spacemacs/ivy-persp-switch-project-advice (project)
(let ((persp-reset-windows-on-nil-window-conf t))
(persp-switch project)))
(defun spacemacs/ivy-persp-switch-project (arg)
(interactive "P")
(require 'counsel-projectile)
(advice-add 'counsel-projectile-switch-project-action
:before #'spacemacs/ivy-persp-switch-project-advice)
(ivy-read "Switch to Project Perspective: "
(if (projectile-project-p)
(cons (abbreviate-file-name (projectile-project-root))
(projectile-relevant-known-projects))
projectile-known-projects)
:action counsel-projectile-switch-project-action
:caller 'spacemacs/ivy-persp-switch-project))
:caller 'spacemacs/ivy-persp-switch-project)
(advice-remove 'counsel-projectile-switch-project-action
'spacemacs/ivy-persp-switch-project-advice))
;; Eyebrowse