Run org-export-odt-preprocess-latex-fragments only if backend is odt
* contrib/lisp/org-odt.el (org-export-odt-do-preprocess-latex-fragments): Renamed from org-export-odt-preprocess-latex-fragments. (org-export-odt-preprocess-latex-fragments): Check that backend is odt. If yes, delegate to org-export-odt-do-preprocess-latex-fragments.
This commit is contained in:
parent
3688deeb3f
commit
2adfdac23b
|
@ -1651,7 +1651,7 @@ visually."
|
|||
|
||||
(defvar org-lparse-latex-fragment-fallback) ; set by org-do-lparse
|
||||
(defvar org-lparse-opt-plist) ; bound during org-do-lparse
|
||||
(defun org-export-odt-preprocess-latex-fragments ()
|
||||
(defun org-export-odt-do-preprocess-latex-fragments ()
|
||||
"Convert LaTeX fragments to images."
|
||||
(let* ((latex-frag-opt (plist-get org-lparse-opt-plist :LaTeX-fragments))
|
||||
(latex-frag-opt-1 ; massage the options
|
||||
|
@ -1673,6 +1673,10 @@ visually."
|
|||
org-current-export-dir nil "Creating LaTeX image %s"
|
||||
nil nil latex-frag-opt-1))))
|
||||
|
||||
(defun org-export-odt-preprocess-latex-fragments ()
|
||||
(when (equal org-export-current-backend 'odt)
|
||||
(org-export-odt-do-preprocess-latex-fragments)))
|
||||
|
||||
(defun org-export-odt-preprocess-label-references ()
|
||||
(goto-char (point-min))
|
||||
(let (label label-components category value pretty-label)
|
||||
|
|
Loading…
Reference in New Issue