From d3a6a8317b9ec05763c8eeff934cea097a4194e2 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 8 Jul 2017 13:47:36 +0200 Subject: [PATCH] feature/workspaces: toggle doom-buffer-list advice --- modules/feature/workspaces/config.el | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/modules/feature/workspaces/config.el b/modules/feature/workspaces/config.el index 2fe870653..3744e0e47 100644 --- a/modules/feature/workspaces/config.el +++ b/modules/feature/workspaces/config.el @@ -55,16 +55,20 @@ renamed.") ;; only auto-save when real buffers are present (advice-add #'persp-asave-on-exit :around #'+workspaces*autosave-real-buffers) + (defun +workspaces|on-persp-mode () + ;; Remap `buffer-list' to current workspace's buffers in `doom-buffer-list' + (if persp-mode + (advice-add #'doom-buffer-list :override #'+workspace-buffer-list) + (advice-remove #'doom-buffer-list #'+workspace-buffer-list))) + (add-hook 'persp-mode-hook #'+workspaces|on-persp-mode) + ;; Defer delayed warnings even further, so they appear after persp-mode is ;; started and the main workspace is ready to display them. Otherwise, warning ;; buffers will be hidden on startup. (remove-hook 'delayed-warnings-hook #'display-delayed-warnings) (defun +workspaces|init (&optional frame) (unless persp-mode - (persp-mode +1) - ;; Remap `buffer-list' to current workspace's buffers in - ;; `doom-buffer-list' - (advice-add #'doom-buffer-list :override #'+workspace-buffer-list)) + (persp-mode +1)) (let ((frame (or frame (selected-frame)))) (unless noninteractive ;; The default perspective persp-mode makes (defined by