diff options
author | Mark Oteiza <mvoteiza@udel.edu> | 2017-06-20 08:09:31 +0200 |
---|---|---|
committer | Bastien <bzg@gnu.org> | 2017-06-20 08:09:31 +0200 |
commit | f7d263970133182331791ab075e28a09d220c741 (patch) | |
tree | 826d1ef1eec401f3b53800759c1afc5416871d06 | |
parent | 566794e98e27830b254256d9113cfa0dec30a3f2 (diff) | |
download | org-mode-f7d263970133182331791ab075e28a09d220c741.tar.gz |
org-agenda.el: New command to rebuild all agenda buffers
* lisp/org-agenda.el (org-agenda-redo-all): New command to
rebuild all agenda buffers.
(org-agenda-mode-map): Bind this new command to `g'.
-rw-r--r-- | lisp/org-agenda.el | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 652fada..2fd33b3 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -2285,7 +2285,7 @@ The following commands are available: (org-defkey org-agenda-mode-map "!" 'org-agenda-toggle-deadlines) (org-defkey org-agenda-mode-map "G" 'org-agenda-toggle-time-grid) (org-defkey org-agenda-mode-map "r" 'org-agenda-redo) -(org-defkey org-agenda-mode-map "g" (lambda () (interactive) (org-agenda-redo t))) +(org-defkey org-agenda-mode-map "g" 'org-agenda-redo-all) (org-defkey org-agenda-mode-map "e" 'org-agenda-set-effort) (org-defkey org-agenda-mode-map "\C-c\C-xe" 'org-agenda-set-effort) (org-defkey org-agenda-mode-map "\C-c\C-x\C-e" @@ -7280,6 +7280,17 @@ in the agenda." (org-goto-line line) (recenter window-line))) +(defun org-agenda-redo-all (&optional exhaustive) + "Rebuild all agenda views in the current buffer. +With a prefix argument, do so in all agenda buffers." + (interactive "P") + (if exhaustive + (dolist (buffer (buffer-list)) + (with-current-buffer buffer + (when (derived-mode-p 'org-agenda-mode) + (org-agenda-redo t)))) + (org-agenda-redo t))) + (defvar org-global-tags-completion-table nil) (defvar org-agenda-filter-form nil) (defvar org-agenda-filtered-by-category nil) |