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

org.el: Execute org-insert-heading and org-insert-heading-respect-content in

Browse source 
orgstruct++-mode when the context around point is an item-body.

* org.el (orgstruct-make-binding): Execute org-insert-heading
and org-insert-heading-respect-content when the context around
point is an item-body.
This commit is contained in:
Christopher Schmidt 2013-05-06 18:21:56 +02:00
parent 9bc55c7d00
commit 741bc5c645
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/org.el
View file

@ -9008,7 +9008,10 @@ if `orgstruct-heading-prefix-regexp' is non-nil."
(not
(let* ,bindings
(org-context-p 'headline 'item
,(when (memq fun '(org-insert-heading))
,(when (memq fun
'(org-insert-heading
org-insert-heading-respect-content
org-meta-return))
'(when orgstruct-is-++
'item-body))))))))
(if fallback