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

Take `org-plain-list-ordered-item-terminator' into consideration when cycling bullets.

Browse source 
* org-list.el (org-cycle-list-bullet): Check
  `org-plain-list-ordered-item-terminator' before allowing 1. or 1) as
  valid bullets when cycling.
This commit is contained in:
Nicolas Goaziou 2010-07-25 11:29:38 +02:00
parent 1bfe98bdf6
commit 25de94f3cc
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/org-list.el
View file

@ -1055,7 +1055,11 @@ is an integer, 0 means `-', 1 means `+' etc. If WHICH is
(looking-at "\\S-")) '("*"))
;; Description items cannot be numbered
(unless (and bullet-rule-p
(org-at-description-p)) '("1." "1)"))))
(or (eq org-plain-list-ordered-item-terminator ?.)
(org-at-description-p))) '("1)"))
(unless (and bullet-rule-p
(or (eq org-plain-list-ordered-item-terminator ?\))
(org-at-description-p))) '("1."))))
(len (length bullet-list))
(item-index (- len (length (member current bullet-list))))
(get-value (lambda (index) (nth (mod index len) bullet-list)))