From 96989dc01e46d123d5bed1de2a209d55bea404d0 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Thu, 4 Jun 2009 09:23:57 +0200 Subject: [PATCH] Agenda: Allow custom command options to work better When the agenda buffer for an agenda series is created, this was so far done without the options of the custom agenda command in place. This meant that some options would not take effect, because the only place where that did would have an effect was during creation of that buffer. This commit makes sure that the global options of an agenda series are in fact in place when the buffer is created. --- lisp/ChangeLog | 5 +++++ lisp/org-agenda.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0f7569879..e5f8cda16 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-06-04 Carsten Dominik + + * org-agenda.el (org-run-agenda-series): Scope global options also + when creating the agenda buffer. + 2009-06-03 Carsten Dominik * org.el (org-adapt-indentation): Improve documentation. diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 51f9fab6a..9cd7c4e0c 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -1862,7 +1862,7 @@ s Search for keywords C Configure custom agenda commands (t (error "Invalid key %c" c)))))))) (defun org-run-agenda-series (name series) - (org-prepare-agenda name) + (org-let (nth 1 series) '(org-prepare-agenda name)) (let* ((org-agenda-multi t) (redo (list 'org-run-agenda-series name (list 'quote series))) (cmds (car series))