From b67a920780f0e99a6ad8ba418c9641506497fbef Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Sat, 29 Apr 2023 17:35:20 +0200 Subject: [PATCH] Fix wrong search region for inserting active filter display --- site-lisp/db-org.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el index cecf78f..7b6fd90 100644 --- a/site-lisp/db-org.el +++ b/site-lisp/db-org.el @@ -123,7 +123,7 @@ Add this function to `org-agenda-finalize-hook' to enable this." ;; First delete any present active filter display, as it might be obsolete. (save-excursion (when-let ((pos (text-property-any - (point) (point-max) 'db/active-filter-display t))) + (point-min) (point-max) 'db/active-filter-display t))) (goto-char pos) (kill-line))) @@ -131,7 +131,7 @@ Add this function to `org-agenda-finalize-hook' to enable this." (when (org-agenda-filter-any) (save-excursion (when-let ((pos (text-property-any - (point) (point-max) 'org-agenda-structural-header t))) + (point-min) (point-max) 'org-agenda-structural-header t))) (goto-char pos) (end-of-line)