[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org a3dac4d20a: fixup! org-fold-show-set-visibility: Do
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org a3dac4d20a: fixup! org-fold-show-set-visibility: Do not reveal emphasis unless DETAIL is `local' |
Date: |
Thu, 28 Apr 2022 22:57:41 -0400 (EDT) |
branch: externals/org
commit a3dac4d20a37c51393f191d01e0ec2170bb260a3
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>
fixup! org-fold-show-set-visibility: Do not reveal emphasis unless DETAIL
is `local'
* lisp/org-fold.el (org-fold-show-set-visibility--text-properties):
Consider nil value for REGION.
---
lisp/org-fold.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/org-fold.el b/lisp/org-fold.el
index 9739bbed2d..0d8f7f9045 100644
--- a/lisp/org-fold.el
+++ b/lisp/org-fold.el
@@ -845,8 +845,9 @@ DETAIL is either nil, `minimal', `local', `ancestors',
(let (font-lock-extend-region-functions)
(font-lock-fontify-region (max (point-min) (1- (car
region))) (cdr region))))))
;; Unfold links.
- (dolist (spec '(org-link org-link-description))
- (org-fold-region (car region) (cdr region) nil spec)))
+ (when region
+ (dolist (spec '(org-link org-link-description))
+ (org-fold-region (car region) (cdr region) nil spec))))
(when region
(dolist (spec (org-fold-core-folding-spec-list))
;; Links are taken care by above.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org a3dac4d20a: fixup! org-fold-show-set-visibility: Do not reveal emphasis unless DETAIL is `local',
ELPA Syncer <=