0
0
Fork 1
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:
Nicolas Goaziou 2010-07-19 11:43:33 +02:00
parent abb490c572
commit 97f857c9b7

View file

@ -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.