org-export: Small fix
* contrib/lisp/org-export.el (org-export-get-ordinal): Change signature. * EXPERIMENTAL/org-e-ascii.el (org-e-ascii--build-caption): Apply changes to previous function
This commit is contained in:
parent
bbbdff9f81
commit
62a631e236
|
@ -54,7 +54,7 @@
|
||||||
(declare-function org-export-get-footnote-number "org-export" (footnote info))
|
(declare-function org-export-get-footnote-number "org-export" (footnote info))
|
||||||
(declare-function org-export-get-headline-number "org-export" (headline info))
|
(declare-function org-export-get-headline-number "org-export" (headline info))
|
||||||
(declare-function org-export-get-ordinal "org-export"
|
(declare-function org-export-get-ordinal "org-export"
|
||||||
(element info &optional types within-section predicate))
|
(element info &optional types predicate))
|
||||||
(declare-function org-export-get-parent-headline "org-export" (blob info))
|
(declare-function org-export-get-parent-headline "org-export" (blob info))
|
||||||
(declare-function org-export-get-relative-level "org-export" (headline info))
|
(declare-function org-export-get-relative-level "org-export" (headline info))
|
||||||
(declare-function org-export-handle-code
|
(declare-function org-export-handle-code
|
||||||
|
@ -642,7 +642,7 @@ keyword."
|
||||||
;; src-block with either a caption or a name.
|
;; src-block with either a caption or a name.
|
||||||
(let ((reference
|
(let ((reference
|
||||||
(org-export-get-ordinal
|
(org-export-get-ordinal
|
||||||
element info nil nil
|
element info nil
|
||||||
(lambda (el) (or (org-element-property :caption el)
|
(lambda (el) (or (org-element-property :caption el)
|
||||||
(org-element-property :name el)))))
|
(org-element-property :name el)))))
|
||||||
(title-fmt (org-e-ascii--translate
|
(title-fmt (org-e-ascii--translate
|
||||||
|
|
|
@ -2865,8 +2865,7 @@ INFO is a plist holding export options."
|
||||||
;; `org-export-get-ordinal' associates a sequence number to any object
|
;; `org-export-get-ordinal' associates a sequence number to any object
|
||||||
;; or element.
|
;; or element.
|
||||||
|
|
||||||
(defun org-export-get-ordinal
|
(defun org-export-get-ordinal (element info &optional types predicate)
|
||||||
(element info &optional types within-section predicate)
|
|
||||||
"Return ordinal number of an element or object.
|
"Return ordinal number of an element or object.
|
||||||
|
|
||||||
ELEMENT is the element or object considered. INFO is the plist
|
ELEMENT is the element or object considered. INFO is the plist
|
||||||
|
|
Loading…
Reference in New Issue