ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Compare `org-current-level' and `org-outline-level' 

* lisp/org.el (org-outline-level, org-current-level): Update
  docstrings to insist on the difference between the two functions.
This commit is contained in:
Nicolas Goaziou 2014-12-23 11:12:00 +01:00
parent 6dcaafff3e
commit 1c5014740e
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lisp/org.el
View File

@ -6237,8 +6237,11 @@ done, nil otherwise."
(defun org-outline-level ()
"Compute the outline level of the heading at point.
If this is called at a normal headline, the level is the number of stars.
Use `org-reduced-level' to remove the effect of `org-odd-levels'."
If this is called at a normal headline, the level is the number
of stars. Use `org-reduced-level' to remove the effect of
`org-odd-levels'. Unlike to `org-current-level', this functions
takes into consideration inline tasks."
(org-with-wide-buffer
(end-of-line)
(if (re-search-backward org-outline-regexp-bol nil t)
@ -8083,7 +8086,10 @@ in the region."
(defun org-current-level ()
"Return the level of the current entry, or nil if before the first headline.
The level is the number of stars at the beginning of the headline."
The level is the number of stars at the beginning of the
headline. Use `org-reduced-level' to remove the effect of
`org-odd-levels'. Unlike to `org-outline-level', this function
ignores inlinetasks."
(let ((level (org-with-limited-levels (org-outline-level))))
(and (> level 0) level)))