mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
lisp/calendar/appt.el (appt-delete-window): Check if buffer is live
* lisp/calendar/appt.el (appt-delete-window): Avoid trying to delete a non-existing buffer.
This commit is contained in:
parent
a4e351b097
commit
23d463d40c
1 changed files with 3 additions and 1 deletions
|
|
@ -482,7 +482,9 @@ Usually just deletes the appointment buffer."
|
|||
(and window
|
||||
(or (eq window (frame-root-window (window-frame window)))
|
||||
(delete-window window))))
|
||||
(kill-buffer appt-buffer-name)
|
||||
(let ((buffer (get-buffer appt-buffer-name)))
|
||||
(when buffer
|
||||
(kill-buffer buffer)))
|
||||
(if appt-audible
|
||||
(beep 1)))
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue