From 4370ee4e44514e9ec96f1f654e16796c5434b3aa Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Tue, 24 Jan 2017 18:14:39 +0100 Subject: [PATCH] org-agenda: Fix `org-agenda-list-stuck-projects' * lisp/org-agenda.el (org-agenda-list-stuck-projects): Fix thinko introduced in 7c3e0b0fd. Reported-by: Matt Lundin --- lisp/org-agenda.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 6d675e928..220ba5f58 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -5124,7 +5124,8 @@ of what a project is and how to check if it stuck, customize the variable `(lambda () (and (save-excursion (let ((case-fold-search nil)) - (re-search-forward ,skip-re (org-end-of-subtree t) t))) + (re-search-forward + ,skip-re (save-excursion (org-end-of-subtree t)) t))) (progn (outline-next-heading) (point)))))) (org-tags-view nil matcher) (setq org-agenda-buffer-name (buffer-name))