From bbc27c011ab5d44d37dca662d1a393d429dbe4b3 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Thu, 27 Aug 2009 18:17:12 +0200 Subject: [PATCH] Agenda: When in separate frame, mark the frame dedicated. Henry Atting writes: > If org agenda is displayed in an other frame then windows aren*t > restored when quitting, I have to kill the frame manually. I > really would like it to behave like e.g. gnus-other-frame which > automatically kills his frame on quitting. --- lisp/ChangeLog | 3 +++ lisp/org-agenda.el | 3 ++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fbdd970e7..254521b3c 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2009-08-27 Carsten Dominik + * org-agenda.el (org-prepare-agenda): When creating a new frame + for the agenda, make the window dedicated. + * org-agenda.el (org-agenda-mode-map): New keys for time motion. * org-table.el (org-table-align): Change the order of reinsertion diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 2dbbe5b64..90d189c71 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -2438,7 +2438,8 @@ bind it in the options section.") ((equal org-agenda-window-setup 'other-window) (org-switch-to-buffer-other-window abuf)) ((equal org-agenda-window-setup 'other-frame) - (switch-to-buffer-other-frame abuf)) + (switch-to-buffer-other-frame abuf) + (set-window-dedicated-p (selected-window) t)) ((equal org-agenda-window-setup 'reorganize-frame) (delete-other-windows) (org-switch-to-buffer-other-window abuf)))) -- 2.11.4.GIT