diff --git a/contrib/lisp/org-odt.el b/contrib/lisp/org-odt.el index 9c81e8423..a5b2d96ba 100644 --- a/contrib/lisp/org-odt.el +++ b/contrib/lisp/org-odt.el @@ -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)