mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-06 20:49:33 +00:00
Code Issues Releases Activity

In calendar-exit don't try to delete or iconify last frame.

Browse Source 
* calendar/calendar.el (calendar-exit): Don't try to delete or
iconify last frame.  See:
http://lists.gnu.org/archive/html/emacs-devel/2012-06/msg00372.html
This commit is contained in:
Martin Rudalics 2012-06-26 09:13:40 +02:00
parent 42997f4d4f
commit 5cf983b29d
2 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ChangeLog
View File

@ -1,3 +1,9 @@
2012-06-26 Martin Rudalics <rudalics@gmx.at>
* calendar/calendar.el (calendar-exit): Don't try to delete or
iconify last frame. See:
http://lists.gnu.org/archive/html/emacs-devel/2012-06/msg00372.html
2012-06-25 Jim Diamond <Jim.Diamond@AcadiaU.ca> (tiny change)
* server.el (server-process-filter): Remember dir in the

9
lisp/calendar/calendar.el
View File

@ -1818,10 +1818,11 @@ the STRINGS are just concatenated and the result truncated."
(dolist (w (window-list-1 nil nil t))
(if (and (memq (window-buffer w) calendar-buffers)
(window-dedicated-p w))
(if calendar-remove-frame-by-deleting
(delete-frame (window-frame w))
(iconify-frame (window-frame w)))
(quit-window kill w)))
(if (eq (window-deletable-p w) 'frame)
(if calendar-remove-frame-by-deleting
(delete-frame (window-frame w))
(iconify-frame (window-frame w)))
(quit-window kill w))))
(dolist (b calendar-buffers)
(quit-windows-on b kill))))))