awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Move persp-mode popup fix to core-popups

Browse Source
This commit is contained in:
Henrik Lissner
2017-06-27 23:26:39 +02:00
parent eb20f3d5a6
commit a894f3ee1e
2 changed files with 14 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
core/core-popups.el
View File

@ -514,6 +514,18 @@ that `doom*popup-save' won't break it."
(add-hook 'doom-popup-mode-hook #'+evil|neotree-fix-popup)) (add-hook 'doom-popup-mode-hook #'+evil|neotree-fix-popup))
(after! persp-mode
(defun doom*persp-mode-restore-popups (&rest _)
"Restore popup windows when loading a perspective from file."
(dolist (window (window-list))
(when-let (plist (window-parameter window 'popup))
(with-selected-window window
(unless doom-popup-mode
(setq-local doom-popup-rules plist)
(doom-popup-mode +1))))))
(advice-add #'persp-load-state-from-file :after #'doom*persp-mode-restore-popups))
(after! quickrun (after! quickrun
;; don't auto-focus quickrun windows, shackle handles that ;; don't auto-focus quickrun windows, shackle handles that
(setq quickrun-focus-p nil)) (setq quickrun-focus-p nil))

14
modules/feature/workspaces/config.el
View File

@ -99,20 +99,10 @@ perspective-specific buffer list via `+workspaces-buffer-list'."
(advice-add #'switch-to-buffer :after #'+workspaces*auto-add-buffer) (advice-add #'switch-to-buffer :after #'+workspaces*auto-add-buffer)
(advice-add #'display-buffer :after #'+workspaces*auto-add-buffer) (advice-add #'display-buffer :after #'+workspaces*auto-add-buffer)
(defun +workspaces|workspace-per-project () (defun +workspaces|create-project-workspace ()
"Create a new workspace when switching project with projectile." "Create a new workspace when switching project with projectile."
(+workspace-switch (projectile-project-name) t)) (+workspace-switch (projectile-project-name) t))
(add-hook 'projectile-before-switch-project-hook #'+workspaces|workspace-per-project) (add-hook 'projectile-before-switch-project-hook #'+workspaces|create-project-workspace)
(defun +workspaces|restore-popups (&rest _)
"Restore popup windows when loading a perspective from file."
(dolist (window (window-list))
(when-let (plist (window-parameter window 'popup))
(with-selected-window window
(unless doom-popup-mode
(setq-local doom-popup-rules plist)
(doom-popup-mode +1))))))
(advice-add #'persp-load-state-from-file :after #'+workspaces|restore-popups)
(defun +workspaces*autosave-real-buffers (orig-fn &rest args) (defun +workspaces*autosave-real-buffers (orig-fn &rest args)
"Don't autosave if no real buffers are open." "Don't autosave if no real buffers are open."