mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-26 15:02:52 +00:00
org-export: Fix code comments
This commit is contained in:
parent
ec9e7ab9c1
commit
fc6b9f1d88
|
@ -3012,7 +3012,7 @@ FOOTNOTE is either a footnote reference or a footnote definition.
|
||||||
INFO is the plist used as a communication channel."
|
INFO is the plist used as a communication channel."
|
||||||
(let* ((label (org-element-property :label footnote))
|
(let* ((label (org-element-property :label footnote))
|
||||||
seen-refs
|
seen-refs
|
||||||
search-ref ; for byte-compiler.
|
search-ref ; For byte-compiler.
|
||||||
(search-ref
|
(search-ref
|
||||||
(function
|
(function
|
||||||
(lambda (data)
|
(lambda (data)
|
||||||
|
@ -3035,11 +3035,11 @@ INFO is the plist used as a communication channel."
|
||||||
((not fn-lbl) (push 'inline seen-refs) nil)
|
((not fn-lbl) (push 'inline seen-refs) nil)
|
||||||
;; Label not seen so far: add it so SEEN-REFS.
|
;; Label not seen so far: add it so SEEN-REFS.
|
||||||
;;
|
;;
|
||||||
;; Also search for subsequent references in footnote
|
;; Also search for subsequent references in
|
||||||
;; definition so numbering following reading logic.
|
;; footnote definition so numbering follows reading
|
||||||
;; Note that we don't have to care about inline
|
;; logic. Note that we don't have to care about
|
||||||
;; definitions, since `org-element-map' already
|
;; inline definitions, since `org-element-map'
|
||||||
;; traverse them at the right time.
|
;; already traverses them at the right time.
|
||||||
;;
|
;;
|
||||||
;; Once again, return nil to stay in the loop.
|
;; Once again, return nil to stay in the loop.
|
||||||
((not (member fn-lbl seen-refs))
|
((not (member fn-lbl seen-refs))
|
||||||
|
|
Loading…
Reference in a new issue