0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-07-20 01:26:29 +00:00

org-export-get-ordinal: Do not ignore ELEMENT type when TYPES is given

* lisp/ox.el (org-export-get-ordinal): Append ELEMENT type to TYPES,
when TYPES is non-nil.
This commit is contained in:
Ihor Radchenko 2022-12-13 11:44:22 +03:00
parent bdb4c4c66e
commit 7048876f6f
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B

View file

@ -4753,7 +4753,8 @@ objects of the same type."
(let ((counter 0))
;; Increment counter until ELEMENT is found again.
(org-element-map (plist-get info :parse-tree)
(or types (org-element-type element))
(or (and types (cons (org-element-type element) types))
(org-element-type element))
(lambda (el)
(let ((cached (org-element-property :org-export--counter el)))
(cond