Explorar el Código

Docbook export: Process footnotes like normal text.

Patch by Baoqiu Cui.
Carsten Dominik hace 16 años
padre
commit
bd66c1ff41
Se han modificado 2 ficheros con 7 adiciones y 1 borrados
  1. 3 0
      lisp/ChangeLog
  2. 4 1
      lisp/org-docbook.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2009-03-30  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-docbook.el (org-export-as-docbook): Process footnotes like
+	normal text.
+
 	* org.el (org-modules): Add org-inlinetasks.el
 	(org-cycle): Implement limiting level on cycling.
 	(org-move-subtree-down): Fix bug with swapping subtrees at end of

+ 4 - 1
lisp/org-docbook.el

@@ -885,7 +885,10 @@ publishing directory."
 				(format "%s<footnote xml:id=\"%s%s\"><para>%s</para></footnote>"
 					(match-string 1 line)
 					org-export-docbook-footnote-id-prefix
-					num (cdr (assoc num footnote-list)))
+					num
+					(save-match-data
+					  (org-docbook-expand
+					   (cdr (assoc num footnote-list)))))
 				t t line))
 		    (push (cons num 1) footref-seen))))))