Sfoglia il codice sorgente

Fix caption processing in LaTeX export

Carsten Dominik 15 anni fa
parent
commit
f3a25f4d34
2 ha cambiato i file con 4 aggiunte e 2 eliminazioni
  1. 2 0
      lisp/ChangeLog
  2. 2 2
      lisp/org-latex.el

+ 2 - 0
lisp/ChangeLog

@@ -5,6 +5,8 @@
 	(org-export-latex-special-chars): Post-process entity replacement.
 	(org-export-latex-fontify-headline): Do not yet protect defined
 	entities - these will be taken care of later.
+	(org-export-latex-tables, org-export-latex-links): Format the
+	caption properly.
 
 	* org-entities.el (org-entities-user): Fix typo.
 

+ 2 - 2
lisp/org-latex.el

@@ -1589,7 +1589,7 @@ The conversion is made depending of STRING-BEFORE and STRING-AFTER."
                              (string-match "\\<align=\\([^ \t\n\r,]+\\)" attr)
                              (match-string 1 attr))
                   floatp (or caption label))
-	    (setq caption (and caption (org-export-latex-content caption)))
+	    (setq caption (and caption (org-export-latex-fontify-headline caption)))
             (setq lines (org-split-string raw-table "\n"))
             (apply 'delete-region (list beg end))
             (when org-export-table-remove-special-lines
@@ -1846,7 +1846,7 @@ The conversion is made depending of STRING-BEFORE and STRING-AFTER."
 				       raw-path))))))))
        ;; process with link inserting
        (apply 'delete-region remove)
-       (setq caption (and caption (org-export-latex-content caption)))
+       (setq caption (and caption (org-export-latex-fontify-headline caption)))
        (cond ((and imgp
 		   (plist-get org-export-latex-options-plist :inline-images))
 	      ;; OK, we need to inline an image