Pārlūkot izejas kodu

Docbook export: Process footnotes like normal text.

Patch by Baoqiu Cui.
Carsten Dominik 16 gadi atpakaļ
vecāks
revīzija
bd66c1ff41
2 mainītis faili ar 7 papildinājumiem un 1 dzēšanām
  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))))))