forked from mirrors/org-mode
ox-ascii: Lighten numbering in table of contents
* lisp/ox-ascii.el (org-ascii--build-title): Use only last number in headline numbering when building table of contents.
This commit is contained in:
parent
8ff3673dfc
commit
64ac3bb5b3
|
@ -651,13 +651,12 @@ possible. It doesn't apply to `inlinetask' elements."
|
|||
(let* ((headlinep (eq (org-element-type element) 'headline))
|
||||
(numbers
|
||||
;; Numbering is specific to headlines.
|
||||
(and headlinep (org-export-numbered-headline-p element info)
|
||||
;; All tests passed: build numbering string.
|
||||
(concat
|
||||
(mapconcat
|
||||
'number-to-string
|
||||
(org-export-get-headline-number element info) ".")
|
||||
" ")))
|
||||
(and headlinep
|
||||
(org-export-numbered-headline-p element info)
|
||||
(let ((numbering (org-export-get-headline-number element info)))
|
||||
(if toc (format "%d. " (org-last numbering))
|
||||
(concat (mapconcat #'number-to-string numbering ".")
|
||||
" ")))))
|
||||
(text
|
||||
(org-trim
|
||||
(org-export-data
|
||||
|
|
Loading…
Reference in a new issue