tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-fold-core-next-folding-state-change: Fix when using overlays 

* lisp/org-fold-core.el (org-fold-core-next-folding-state-change):
Consider overlay properties.
This commit is contained in:
Ihor Radchenko 2022-08-13 14:55:50 +08:00
parent 8a781d35dc
commit 687d5702d2
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-fold-core.el
View File

@ -906,8 +906,8 @@ Search backwards when PREVIOUS-P is non-nil."
#'max
#'min)
(mapcar (if previous-p
(lambda (prop) (max (or limit (point-min)) (previous-single-property-change pos prop nil (or limit (point-min)))))
(lambda (prop) (next-single-property-change pos prop nil (or limit (point-max)))))
(lambda (prop) (max (or limit (point-min)) (previous-single-char-property-change pos prop nil (or limit (point-min)))))
(lambda (prop) (next-single-char-property-change pos prop nil (or limit (point-max)))))
(mapcar (lambda (el) (org-fold-core--property-symbol-get-create el nil t))
spec-or-alias))))