Revert "Don't bind org-agenda key to an anonymous function"

This reverts commit 49c0ff29c2e0243ba35ec17e3e3af49369be43db.

diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el
index 409c93abedcadcff4bdd58205d0eeb15e94d8b99..153e3772b0cfc129873d0a77f9f1f53785451c35 100644 (file)
--- a/lisp/org/org-agenda.el
+++ b/lisp/org/org-agenda.el
@@ -2252,7 +2252,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" 'org-agenda-redo-all)
+(org-defkey org-agenda-mode-map "g" (lambda () (interactive) (org-agenda-redo t)))
 (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"
@@ -7310,17 +7310,6 @@ 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)