mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

org-footnote: fix xhtml export 

* lisp/org-footnote.el (org-footnote-normalize): be sure to separate
  the last footnote definition from the rest of the buffer.

Thanks to Jambunathan K for reporting this.
This commit is contained in:
Nicolas Goaziou 2011-08-29 13:05:57 +02:00
parent 9e52be7253
commit d6aa8ffa13
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/org-footnote.el
View File

@ -774,7 +774,7 @@ Additional note on `org-footnote-insert-pos-for-preprocessor':
(when (and (derived-mode-p 'message-mode) (when (and (derived-mode-p 'message-mode)
(save-excursion (save-excursion
(re-search-forward message-signature-separator nil t))) (re-search-forward message-signature-separator nil t)))
(open-line 2)) (open-line 1))
(when org-footnote-tag-for-non-org-mode-files (when org-footnote-tag-for-non-org-mode-files
(insert "\n" org-footnote-tag-for-non-org-mode-files "\n"))) (insert "\n" org-footnote-tag-for-non-org-mode-files "\n")))
((and org-footnote-section (not export-props)) ((and org-footnote-section (not export-props))
@ -787,6 +787,7 @@ Additional note on `org-footnote-insert-pos-for-preprocessor':
(insert (mapconcat (lambda (x) (format "\n[%s] %s" (insert (mapconcat (lambda (x) (format "\n[%s] %s"
(nth (if sort-only 0 1) x) (nth 2 x))) (nth (if sort-only 0 1) x) (nth 2 x)))
ref-table "\n")) ref-table "\n"))
(unless (eobp) (insert "\n"))
;; When exporting, add newly inserted markers along with their ;; When exporting, add newly inserted markers along with their
;; associated definition to `org-export-footnotes-seen'. ;; associated definition to `org-export-footnotes-seen'.
(when export-props (when export-props