mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-21 03:18:57 +00:00
Code Releases Activity

Newline-and-indent respects list structure

Browse source 
* lisp/org.el (org-return): when called from inside an item with the
  indent flag, function should keep text moved inside the item. This
  allows to use C-j to separate lines in an item: cursor won't go back
  to column 0.
This commit is contained in:
Nicolas Goaziou 2011-01-23 12:06:32 +01:00
parent dcf23c416f
commit 89c066a10c
1 changed files with 12 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
lisp/org.el
View file

@ -17490,6 +17490,18 @@ See the individual commands for more information."
((org-at-table-p)
(org-table-justify-field-maybe)
(call-interactively 'org-table-next-row))
;; when `newline-and-indent' is called within a list, make sure
;; text moved stays inside the item.
((and (org-in-item-p) indent)
(if (and (org-at-item-p) (>= (point) (match-end 0)))
(progn
(newline)
(org-indent-line-to (length (match-string 0))))
(let ((ind (org-get-indentation)))
(newline)
(if (org-looking-back org-list-end-re)
(org-indent-line-function)
(org-indent-line-to ind)))))
((and org-return-follows-link
(eq (get-text-property (point) 'face) 'org-link))
(call-interactively 'org-open-at-point))