mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-22 10:49:19 +00:00
Minor refactoring.
This commit is contained in:
parent
abb490c572
commit
97f857c9b7
|
@ -564,20 +564,14 @@ Point returned is at eol."
|
|||
Stop searching at LIMIT. Return nil if no item is found. This
|
||||
function does not move point."
|
||||
(org-list-get-item-same-level
|
||||
#'org-search-forward-unenclosed
|
||||
pos
|
||||
limit
|
||||
#'end-of-line))
|
||||
#'org-search-forward-unenclosed pos limit #'end-of-line))
|
||||
|
||||
(defun org-get-previous-item (pos limit)
|
||||
"Get the point of the previous item at the same level as POS.
|
||||
Stop searching at LIMIT. Return nil if no item is found. This
|
||||
function does not move point."
|
||||
(org-list-get-item-same-level
|
||||
#'org-search-backward-unenclosed
|
||||
pos
|
||||
limit
|
||||
#'beginning-of-line))
|
||||
#'org-search-backward-unenclosed pos limit #'beginning-of-line))
|
||||
|
||||
(defun org-next-item ()
|
||||
"Move to the beginning of the next item.
|
||||
|
|
Loading…
Reference in a new issue