[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 87c294c7b6: org-agenda-new-marker: Do not create ma
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 87c294c7b6: org-agenda-new-marker: Do not create maker in killed agenda buffers |
Date: |
Sun, 16 Oct 2022 06:58:02 -0400 (EDT) |
branch: externals/org
commit 87c294c7b6419e4b262fbcd6ecd1d535a8496af5
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
org-agenda-new-marker: Do not create maker in killed agenda buffers
* lisp/org-agenda.el (org-agenda-new-marker): Do not create buffer
marker unless agenda buffer is live.
Reported-by: Hu Lucius <orctarorga@gmail.com>
Link:
https://orgmode.org/list/CACDPnMHOfUmO4sjer_pcox5Z5sodkVN-UW29AAYdL8V-iOiGoA@mail.gmail.com
---
lisp/org-agenda.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index fa7ef2f3c8..2fbae12896 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -4280,8 +4280,8 @@ Marker is at point, or at POS if non-nil. Org mode keeps
a list
of these markers and resets them when they are no longer in use."
(let ((m (copy-marker (or pos (point)) t)))
(setq org-agenda-last-marker-time (float-time))
- (if org-agenda-buffer
- (with-current-buffer org-agenda-buffer
+ (if (and org-agenda-buffer (buffer-live-p org-agenda-buffer))
+ (with-current-buffer org-agenda-buffer
(push m org-agenda-markers))
(push m org-agenda-markers))
m))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org 87c294c7b6: org-agenda-new-marker: Do not create maker in killed agenda buffers,
ELPA Syncer <=