mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-20 19:24:20 +00:00
Code

ox-latex: Properly escape special characters in tags

Browse Source 
* lisp/ox-latex.el (org-latex-format-headline-default-function):
(org-latex-format-inlinetask-default-function): Use
`org-latex--protect-text' instead of `org-latex-plain-text' to format
tags.
This commit is contained in:
Nicolas Goaziou 2017-01-11 12:20:05 +01:00
parent 71890398cd
commit 3fa7903d76
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/ox-latex.el
View File

@ -2009,8 +2009,7 @@ See `org-latex-format-headline-function' for details."
text
(and tags
(format "\\hfill{}\\textsc{%s}"
(mapconcat (lambda (tag) (org-latex-plain-text tag info))
tags ":")))))
(mapconcat #'org-latex--protect-text tags ":")))))
;;;; Horizontal Rule
@ -2092,7 +2091,7 @@ holding contextual information."
todo todo-type priority title tags contents info)))
(defun org-latex-format-inlinetask-default-function
(todo _todo-type priority title tags contents info)
(todo _todo-type priority title tags contents info)
"Default format function for a inlinetasks.
See `org-latex-format-inlinetask-function' for details."
(let ((full-title
@ -2101,9 +2100,7 @@ See `org-latex-format-inlinetask-function' for details."
title
(when tags
(format "\\hfill{}\\textsc{:%s:}"
(mapconcat
(lambda (tag) (org-latex-plain-text tag info))
tags ":"))))))
(mapconcat #'org-latex--protect-text tags ":"))))))
(concat "\\begin{center}\n"
"\\fbox{\n"
"\\begin{minipage}[c]{.6\\textwidth}\n"