[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/embark 58e9fb627f 2/3: Make sure heading is shown when
From: |
ELPA Syncer |
Subject: |
[elpa] externals/embark 58e9fb627f 2/3: Make sure heading is shown when jumping to it |
Date: |
Sun, 10 Sep 2023 21:57:57 -0400 (EDT) |
branch: externals/embark
commit 58e9fb627f9fd252d23537c62e94f415b052c46a
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>
Make sure heading is shown when jumping to it
Thanks to @alphapapa for reporting this.
---
embark-org.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/embark-org.el b/embark-org.el
index b7023384f3..3e4ae5dc6f 100644
--- a/embark-org.el
+++ b/embark-org.el
@@ -583,7 +583,9 @@ target. Applies RUN to the REST of the arguments."
(when-let ((target (if (cdr args) (plist-get args :target) (car args)))
(marker (get-text-property 0 'org-marker target)))
(pop-to-buffer (marker-buffer marker))
+ (widen)
(goto-char marker)
+ (org-fold-reveal)
(pulse-momentary-highlight-one-line)))
(defconst embark-org--invisible-jump-to-remote-heading