tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-export: Fix code comments

This commit is contained in:
Nicolas Goaziou 2012-08-20 10:25:05 +02:00
parent ec9e7ab9c1
commit fc6b9f1d88
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
contrib/lisp/org-export.el
View File

@ -3012,7 +3012,7 @@ FOOTNOTE is either a footnote reference or a footnote definition.
INFO is the plist used as a communication channel."
(let* ((label (org-element-property :label footnote))
seen-refs
search-ref ; for byte-compiler.
search-ref ; For byte-compiler.
(search-ref
(function
(lambda (data)
@ -3035,11 +3035,11 @@ INFO is the plist used as a communication channel."
((not fn-lbl) (push 'inline seen-refs) nil)
;; Label not seen so far: add it so SEEN-REFS.
;;
;; Also search for subsequent references in footnote
;; definition so numbering following reading logic.
;; Note that we don't have to care about inline
;; definitions, since `org-element-map' already
;; traverse them at the right time.
;; Also search for subsequent references in
;; footnote definition so numbering follows reading
;; logic. Note that we don't have to care about
;; inline definitions, since `org-element-map'
;; already traverses them at the right time.
;;
;; Once again, return nil to stay in the loop.
((not (member fn-lbl seen-refs))