msyds/sydnix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat(emacs): delete popup window when killed

Browse Source
This commit is contained in:
Madeleine Sydney Slaga
2025-12-04 23:05:49 -07:00
parent f8a69e7e56
commit b0a5172365
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
modules/home/users/msyds/emacs/lisp/syd/popups.el
View File

@@ -37,6 +37,12 @@
(popper-close-latest) (popper-close-latest)
(while popper-open-popup-alist (while popper-open-popup-alist
(popper-close-latest))))) (popper-close-latest)))))
(syd-add-hook 'kill-buffer-hook
(defun syd-popups--kill-buffer-hook-h ()
"Delete the window of a killed popup buffer."
(when-let* ((window (get-buffer-window)))
(when (eq popper-popup-status 'popup)
(delete-window window)))))
(add-hook 'syd-new-popup-hook #'hide-mode-line-mode)) (add-hook 'syd-new-popup-hook #'hide-mode-line-mode))
(provide 'syd/popups) (provide 'syd/popups)