diff options
author | Carsten Dominik <carsten.dominik@gmail.com> | 2009-08-27 18:17:12 +0200 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2009-08-27 18:18:28 +0200 |
commit | bbc27c011ab5d44d37dca662d1a393d429dbe4b3 (patch) | |
tree | 2e99ad478a28458ba4f8f7a78ba2a2671580d15f | |
parent | fa36f186b273a76b23fe1092bb6aaa3369b1e661 (diff) | |
download | org-mode-bbc27c011ab5d44d37dca662d1a393d429dbe4b3.tar.gz |
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.
-rwxr-xr-x | lisp/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/org-agenda.el | 3 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fbdd970..254521b 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2009-08-27 Carsten Dominik <carsten.dominik@gmail.com> + * 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 2dbbe5b..90d189c 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)))) |