Apply string-trim to LaTeX font collections
This commit is contained in:
parent
2e8695eb20
commit
e1de90f095
|
@ -11531,6 +11531,7 @@ the cars in `org-latex-fontsets'."
|
|||
(let* ((fontset-spec (org-latex-fontset-entry))
|
||||
(fontset (alist-get (car fontset-spec) org-latex-fontsets)))
|
||||
(if fontset
|
||||
(string-trim
|
||||
(concat
|
||||
(mapconcat
|
||||
(lambda (style)
|
||||
|
@ -11542,7 +11543,7 @@ the cars in `org-latex-fontsets'."
|
|||
(pcase (cdr fontset-spec)
|
||||
(:serif "\\renewcommand{\\familydefault}{\\rmdefault}\n")
|
||||
(:sans "\\renewcommand{\\familydefault}{\\sfdefault}\n")
|
||||
(:mono "\\renewcommand{\\familydefault}{\\ttdefault}\n"))))
|
||||
(:mono "\\renewcommand{\\familydefault}{\\ttdefault}\n")))))
|
||||
(error "Font-set %s is not provided in org-latex-fontsets" (car fontset-spec)))))
|
||||
#+end_src
|
||||
|
||||
|
|
Loading…
Reference in New Issue