EXPERIMENTAL/org-latex: Small refactoring.

* EXPERIMENTAL/org-latex.el (org-latex-footnote-reference): Small
  refactoring.
This commit is contained in:
Nicolas Goaziou 2011-11-29 21:37:15 +01:00
parent 33d764f24e
commit 02c2648a01
1 changed files with 1 additions and 2 deletions

View File

@ -873,8 +873,7 @@ CONTENTS is nil. INFO is a plist holding contextual information."
org-latex-footnote-separator) org-latex-footnote-separator)
;; Use \footnotemark if the footnote has already been defined. ;; Use \footnotemark if the footnote has already been defined.
;; Otherwise, define it with \footnote command. ;; Otherwise, define it with \footnote command.
(let* ((all-seen (plist-get org-export-persistent-properties (let* ((all-seen (plist-get info :seen-footnote-labels))
:seen-footnote-labels))
(label (org-element-get-property :label footnote-reference)) (label (org-element-get-property :label footnote-reference))
;; Anonymous footnotes are always new footnotes. ;; Anonymous footnotes are always new footnotes.
(seenp (and label (member label all-seen))) (seenp (and label (member label all-seen)))