feature/popup: refactor how closing unsaved popups are handled
This commit is contained in:
parent
e59fd75107
commit
4edb7999e9
1 changed files with 4 additions and 5 deletions
|
@ -60,11 +60,10 @@ and enables `+popup-buffer-mode'."
|
||||||
(let ((buffer (window-buffer window))
|
(let ((buffer (window-buffer window))
|
||||||
ttl)
|
ttl)
|
||||||
(when (and (buffer-file-name buffer)
|
(when (and (buffer-file-name buffer)
|
||||||
(buffer-modified-p buffer))
|
(buffer-modified-p buffer)
|
||||||
(with-current-buffer buffer
|
(y-or-n-p "Popup buffer is modified. Save it?"))
|
||||||
(if (y-or-n-p "Popup buffer is modified. Save it?")
|
(with-current-buffer buffer (save-buffer)))
|
||||||
(save-buffer)
|
(set-buffer-modified-p nil)
|
||||||
(set-buffer-modified-p nil))))
|
|
||||||
(let ((ignore-window-parameters t))
|
(let ((ignore-window-parameters t))
|
||||||
(delete-window window))
|
(delete-window window))
|
||||||
(unless (window-live-p window)
|
(unless (window-live-p window)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue