alx/eyebrowse
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add a post-window-delete-hook

Browse Source
This commit is contained in:
vxid
2019-09-17 10:32:58 +02:00
committed by GitHub
parent d75e37a048
commit 4ba5c05ab1
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
eyebrowse.el
View File

@ -152,6 +152,11 @@ t: Clean up and display the scratch buffer."
:type 'hook :type 'hook
:group 'eyebrowse) :group 'eyebrowse)
(defcustom eyebrowse-post-window-delete-hook nil
"Hook run after deleting a window config."
:type 'hook
:group 'eyebrowse)
(defcustom eyebrowse-default-workspace-slot 1 (defcustom eyebrowse-default-workspace-slot 1
"Slot number assigned to the default workspace." "Slot number assigned to the default workspace."
:type 'integer :type 'integer
@ -455,7 +460,8 @@ another appropriate window config."
(eyebrowse-prev-window-config nil) (eyebrowse-prev-window-config nil)
(eyebrowse-next-window-config nil)) (eyebrowse-next-window-config nil))
(run-hooks 'eyebrowse-pre-window-delete-hook) (run-hooks 'eyebrowse-pre-window-delete-hook)
(eyebrowse--delete-window-config (eyebrowse--get 'last-slot))))) (eyebrowse--delete-window-config (eyebrowse--get 'last-slot))
(run-hooks 'eyebrowse-post-window-delete-hook))))
(defun eyebrowse-rename-window-config (slot tag) (defun eyebrowse-rename-window-config (slot tag)
"Rename the window config at SLOT to TAG. "Rename the window config at SLOT to TAG.