From e83d4e94d873ba0c983d233dced8d5880dc519b9 Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Sat, 3 Jun 2023 11:09:35 +0300 Subject: [PATCH] fixup! org-fold-core: Fix folding for `isearch-filter-prediacate' outside isearch * lisp/org-fold-core.el (org-fold-core--isearch-show-temporary): Fix edge case when `org-fold-core--isearch-local-regions' contains empty region. --- lisp/org-fold-core.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/org-fold-core.el b/lisp/org-fold-core.el index d58cbc649..6d45237c9 100644 --- a/lisp/org-fold-core.el +++ b/lisp/org-fold-core.el @@ -1197,8 +1197,9 @@ REGION can also be an overlay in current buffer." (org-fold-core--isearch-show region)) (setq pos (org-fold-core-next-folding-state-change nil pos (cdr region))))))) (mapc (lambda (val) - (org-fold-core--keep-overlays - (org-fold-core-region (cadr val) (cddr val) t (car val)))) + (when (cdr val) ;; non-empty region + (org-fold-core--keep-overlays + (org-fold-core-region (cadr val) (cddr val) t (car val))))) (gethash region org-fold-core--isearch-local-regions)) (remhash region org-fold-core--isearch-local-regions)))))