Switch to Spacemacs Home on creating *new* layout
This commit is contained in:
parent
81aea286ad
commit
7b931a9f5b
|
@ -58,7 +58,10 @@ perspectives does."
|
||||||
'(("Create new perspective" .
|
'(("Create new perspective" .
|
||||||
(lambda (name)
|
(lambda (name)
|
||||||
(let ((persp-reset-windows-on-nil-window-conf t))
|
(let ((persp-reset-windows-on-nil-window-conf t))
|
||||||
(persp-switch name)))))))))
|
(if (member name (persp-names-current-frame-fast-ordered))
|
||||||
|
(persp-switch name)
|
||||||
|
(persp-switch name)
|
||||||
|
(spacemacs/home))))))))))
|
||||||
|
|
||||||
;; ability to use helm find files but also adds to current perspective
|
;; ability to use helm find files but also adds to current perspective
|
||||||
(defun spacemacs/helm-persp-close ()
|
(defun spacemacs/helm-persp-close ()
|
||||||
|
|
|
@ -152,7 +152,8 @@
|
||||||
(concat "Perspective in this position doesn't exist.\n"
|
(concat "Perspective in this position doesn't exist.\n"
|
||||||
"Do you want to create one? "))
|
"Do you want to create one? "))
|
||||||
(let ((persp-reset-windows-on-nil-window-conf t))
|
(let ((persp-reset-windows-on-nil-window-conf t))
|
||||||
(persp-switch nil))))))
|
(persp-switch nil)
|
||||||
|
(spacemacs/home))))))
|
||||||
|
|
||||||
;; Define all `spacemacs/persp-switch-to-X' functions
|
;; Define all `spacemacs/persp-switch-to-X' functions
|
||||||
(dolist (i (number-sequence 9 0 -1))
|
(dolist (i (number-sequence 9 0 -1))
|
||||||
|
|
Loading…
Reference in a new issue