org-insert-property-drawer: Fix incorrect fold type
* lisp/org.el (org-insert-property-drawer): When folding style is overlays, do not use outline folds to fold the property drawer. Reported-by: Bruno Cardoso <cardoso.bc@gmail.com> Link: https://orgmode.org/list/87wmq5btzn.fsf@gmail.com
This commit is contained in:
parent
7653e58f6d
commit
fb61e83f2a
|
@ -13358,7 +13358,7 @@ drawer is immediately hidden."
|
|||
(inhibit-read-only t))
|
||||
(unless (bobp) (insert "\n"))
|
||||
(insert ":PROPERTIES:\n:END:")
|
||||
(org-fold-region (line-end-position 0) (point) t (if (eq org-fold-core-style 'text-properties) 'drawer 'outline))
|
||||
(org-fold-region (line-end-position 0) (point) t 'drawer)
|
||||
(when (or (eobp) (= begin (point-min))) (insert "\n"))
|
||||
(org-indent-region begin (point))))))
|
||||
|
||||
|
|
Loading…
Reference in New Issue