summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien <bzg@gnu.org>2015-09-07 16:59:13 +0200
committerBastien <bzg@gnu.org>2015-09-07 16:59:13 +0200
commitaff6142b81fb3432510de62624bdf09027c1a679 (patch)
tree51c3232cd5c3f51dccc5e800a2b685b155b02a6b
parent366dc4e369cab2009b55e2de81d9190871505d6e (diff)
downloadorg-mode-aff6142b81fb3432510de62624bdf09027c1a679.tar.gz
org.el: Enhance docstrings
* org.el (org-demote-subtree, org-do-demote) (org-fix-position-after-promote): Enhance docstrings.
-rwxr-xr-xlisp/org.el15
1 files changed, 7 insertions, 8 deletions
diff --git a/lisp/org.el b/lisp/org.el
index f3bb30a..74fe4ae 100755
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -8043,18 +8043,17 @@ See also `org-promote'."
(org-fix-position-after-promote))
(defun org-demote-subtree ()
- "Demote the entire subtree. See `org-demote'.
-See also `org-promote'."
+ "Demote the entire subtree.
+See `org-demote' and `org-promote'."
(interactive)
(save-excursion
(org-with-limited-levels (org-map-tree 'org-demote)))
(org-fix-position-after-promote))
-
(defun org-do-promote ()
"Promote the current heading higher up the tree.
-If the region is active in `transient-mark-mode', promote all headings
-in the region."
+If the region is active in `transient-mark-mode', promote all
+headings in the region."
(interactive)
(save-excursion
(if (org-region-active-p)
@@ -8064,8 +8063,8 @@ in the region."
(defun org-do-demote ()
"Demote the current heading lower down the tree.
-If the region is active in `transient-mark-mode', demote all headings
-in the region."
+If the region is active in `transient-mark-mode', demote all
+headings in the region."
(interactive)
(save-excursion
(if (org-region-active-p)
@@ -8074,7 +8073,7 @@ in the region."
(org-fix-position-after-promote))
(defun org-fix-position-after-promote ()
- "Make sure that after pro/demotion cursor position is right."
+ "Fix cursor position and indentation after demoting/promoting."
(let ((pos (point)))
(when (save-excursion
(beginning-of-line 1)