26 lines
933 B
EmacsLisp
26 lines
933 B
EmacsLisp
(use-package persp-mode
|
|
:hook (after-init . persp-mode)
|
|
:init
|
|
(setq persp-set-ido-hooks t
|
|
persp-nil-name "main"
|
|
persp-keymap-prefix (kbd "C-x x"))
|
|
:config
|
|
(with-eval-after-load "persp-mode"
|
|
(with-eval-after-load "ivy"
|
|
(add-hook 'ivy-ignore-buffers
|
|
#'(lambda (b)
|
|
(when persp-mode
|
|
(let ((persp (get-current-persp)))
|
|
(if persp
|
|
(not (persp-contain-buffer-p b persp))
|
|
nil)))))
|
|
|
|
(setq ivy-sort-functions-alist
|
|
(append ivy-sort-functions-alist
|
|
'((persp-kill-buffer . nil)
|
|
(persp-remove-buffer . nil)
|
|
(persp-add-buffer . nil)
|
|
(persp-switch . nil)
|
|
(persp-window-switch . nil)
|
|
(persp-frame-switch . nil)))))))
|