summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <n.goaziou@gmail.com>2010-07-25 11:29:38 +0200
committerNicolas Goaziou <n.goaziou@gmail.com>2010-09-01 19:05:50 +0200
commit25de94f3cc04026f52e5446230a154ee97a3adbc (patch)
tree25aab3f9b2e929798150e838e675c131346fb6d9
parent1bfe98bdf6490cc9026fb71f853e5727c38dc7d9 (diff)
downloadorg-mode-25de94f3cc04026f52e5446230a154ee97a3adbc.tar.gz
Take `org-plain-list-ordered-item-terminator' into consideration when cycling bullets.
* org-list.el (org-cycle-list-bullet): Check `org-plain-list-ordered-item-terminator' before allowing 1. or 1) as valid bullets when cycling.
-rw-r--r--lisp/org-list.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/org-list.el b/lisp/org-list.el
index bad8cd6..b387023 100644
--- a/lisp/org-list.el
+++ b/lisp/org-list.el
@@ -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)))