[emacs] Fix org-reminders ID collision blocking reminders

This commit is contained in:
2026-08-09 16:20:45 -04:00
parent 24d2c2b1bb
commit 7640e2cbb9

View File

@ -127,7 +127,7 @@ Each spec is (ID HEADING FIRE-TIME LABEL SECONDS)."
(let ((subtree-end (save-excursion (org-end-of-subtree t t)))) (let ((subtree-end (save-excursion (org-end-of-subtree t t))))
(if (and (org-get-todo-state) (not (org-entry-is-done-p))) (if (and (org-get-todo-state) (not (org-entry-is-done-p)))
(let* ((heading (string-trim (org-get-heading t t t t))) (let* ((heading (string-trim (org-get-heading t t t t)))
(id (or (org-entry-get nil "ID" t) (id (or (org-entry-get nil "ID")
(format "%s|%s" file heading))) (format "%s|%s" file heading)))
(rem (org-entry-get nil "REMINDER" t)) (rem (org-entry-get nil "REMINDER" t))
(anchor (progn (anchor (progn