* lisp/org-agenda.el (org-agenda-redo): Don't error in
`get-text-property' on empty agenda due to invalid point.

TINYCHANGE
---
 lisp/org-agenda.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index dd86a716a..481eba503 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -7875,7 +7875,7 @@ in the agenda."
   "Rebuild possibly ALL agenda view(s) in the current buffer."
   (interactive "P")
   (defvar org-agenda-tag-filter-while-redo) ;FIXME: Where is this var used?
-  (let* ((p (or (and (looking-at "\\'") (1- (point))) (point)))
+  (let* ((p (or (and (/= 1 (point)) (looking-at "\\'") (1- (point))) (point)))
         (cpa (unless (eq all t) current-prefix-arg))
         (org-agenda-doing-sticky-redo org-agenda-sticky)
         (org-agenda-sticky nil)
-- 
2.51.2


Reply via email to