Browse Source

Merge branch 'maint'

Nicolas Goaziou 9 years ago
parent
commit
9a792523d6
1 changed files with 3 additions and 1 deletions
  1. 3 1
      lisp/org-agenda.el

+ 3 - 1
lisp/org-agenda.el

@@ -7169,7 +7169,9 @@ in the file.  Otherwise, restriction will be to the current subtree."
 
 
 (defun org-agenda-maybe-redo ()
 (defun org-agenda-maybe-redo ()
   "If there is any window showing the agenda view, update it."
   "If there is any window showing the agenda view, update it."
-  (let ((w (get-buffer-window org-agenda-buffer-name t))
+  (let ((w (get-buffer-window (or org-agenda-this-buffer-name
+				  org-agenda-buffer-name)
+			      t))
 	(w0 (selected-window)))
 	(w0 (selected-window)))
     (when w
     (when w
       (select-window w)
       (select-window w)