Browse Source

Bugfix: Close paragraph after footnote.

Patch by Madhu.
Carsten Dominik 17 years ago
parent
commit
2e634d82d9
2 changed files with 5 additions and 1 deletions
  1. 3 0
      lisp/ChangeLog
  2. 2 1
      lisp/org-exp.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2008-05-19  Carsten Dominik  <dominik@science.uva.nl>
 
+	* org-exp.el (org-export-as-html): Close paragraph after a
+	footnote.
+
 	* org.el (org-update-parent-todo-statistics): New function.
 
 	* org-exp.el (org-icalendar-store-UID): New option.

+ 2 - 1
lisp/org-exp.el

@@ -2932,7 +2932,8 @@ lang=\"%s\" xml:lang=\"%s\">
 		(org-close-par-maybe)
 		(let ((n (match-string 1 line)))
 		  (setq line (replace-match
-			      (format "<p class=\"footnote\"><sup><a class=\"footnum\" name=\"fn.%s\" href=\"#fnr.%s\">%s</a></sup>" n n n) t t line)))))
+			      (format "<p class=\"footnote\"><sup><a class=\"footnum\" name=\"fn.%s\" href=\"#fnr.%s\">%s</a></sup>" n n n) t t line))
+		  (setq line (concat line "</p>")))))
 
 	    ;; Check if the line break needs to be conserved
 	    (cond