[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 7c514c0a24: consult--invisible-open-*: Use cano
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 7c514c0a24: consult--invisible-open-*: Use canonical |
Date: |
Sun, 25 Dec 2022 09:57:24 -0500 (EST) |
branch: externals/consult
commit 7c514c0a2414347c4cd0482a691371625a8a1c53
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
consult--invisible-open-*: Use canonical
---
consult.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/consult.el b/consult.el
index ffac8cd0b2..214482f820 100644
--- a/consult.el
+++ b/consult.el
@@ -1346,7 +1346,7 @@ ORIG is the original function, HOOKS the arguments."
See `isearch-open-necessary-overlays' and `isearch-open-overlay-temporary'."
(if (and (derived-mode-p #'org-mode) (fboundp 'org-fold-show-set-visibility))
;; New Org 9.6 fold-core API
- (org-fold-show-set-visibility 'lineage)
+ (org-fold-show-set-visibility 'canonical)
(dolist (ov (let ((inhibit-field-text-motion t))
(overlays-in (line-beginning-position) (line-end-position))))
(when-let (fun (overlay-get ov 'isearch-open-invisible))
@@ -1364,7 +1364,7 @@ See `isearch-open-necessary-overlays' and
`isearch-open-overlay-temporary'."
;; modifications such that we can restore the ones which got modified.
(let ((regions (delq nil (org-fold-core-get-regions
:with-markers t :from (point-min) :to
(point-max)))))
- (org-fold-show-set-visibility 'lineage)
+ (org-fold-show-set-visibility 'canonical)
(list (lambda ()
(pcase-dolist (`(,beg ,end ,spec) regions)
(org-fold-core-region beg end t spec)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/consult 7c514c0a24: consult--invisible-open-*: Use canonical,
ELPA Syncer <=