From cb6425e6a0560d8db6421a8338c25120a4017160 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Thu, 5 May 2011 10:23:32 +0200 Subject: [PATCH] Process index entries * lisp/org-latex.el (org-export-latex-preprocess): Pipe index entries through org-export-latex-fontify-headline. --- lisp/org-latex.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/org-latex.el b/lisp/org-latex.el index 403b5729b..75d1b65ff 100644 --- a/lisp/org-latex.el +++ b/lisp/org-latex.el @@ -2324,11 +2324,14 @@ The conversion is made depending of STRING-BEFORE and STRING-AFTER." ;; Convert #+INDEX to LaTeX \\index. (goto-char (point-min)) - (let ((case-fold-search t)) + (let ((case-fold-search t) entry) (while (re-search-forward "^[ \t]*#\\+index:[ \t]*\\([^ \t\r\n].*?\\)[ \t]*$" nil t) - (replace-match (format "\\index{%s}" (match-string 1)) t t))) + (setq entry + (save-match-data + (org-export-latex-fontify-headline (match-string 1)))) + (replace-match (format "\\index{%s}" entry) t t))) ;; Convert center (goto-char (point-min)) -- 2.11.4.GIT