Fix HTML export of footnotes with lists, tables, quotes, etc.

* org-html.el (org-export-as-html): Fix export of footnotes
containing lists, tables, quotes, etc.
This commit is contained in:
Puneeth Chaganti 2011-03-18 16:52:05 +00:00 committed by Bastien Guerry
parent c109334152
commit a201b11286
1 changed files with 6 additions and 3 deletions

View File

@ -1691,9 +1691,12 @@ lang=\"%s\" xml:lang=\"%s\">
(save-excursion
(goto-char (point-min))
(while (re-search-forward "<p class=\"footnote\">[^\000]*?\\(</p>\\|\\'\\)" nil t)
(push (match-string 0) footnotes)
(replace-match "" t t)))
(while (re-search-forward
"\\(\\(<p class=\"footnote\">\\)[^\000]*?\\)\\(\\(\\2\\)\\|\\'\\)"
nil t)
(push (match-string 1) footnotes)
(replace-match "\\4" t nil)
(goto-char (match-beginning 0))))
(when footnotes
(insert (format org-export-html-footnotes-section
(nth 4 lang-words)