summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2015-02-26 21:39:05 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2015-02-26 21:39:05 +0100
commitfc850ce623c24b5eb3066917599956940fc0fda3 (patch)
treeca3e177922febda02c0701ba2bd6995fab1241a4
parent9eb8c4082197cb29f356591bcd19d0af8661c9bb (diff)
downloadorg-mode-fc850ce623c24b5eb3066917599956940fc0fda3.tar.gz
ox-odt: Small refactoring
* lisp/ox-odt.el (org-odt--translate-latex-fragments): Small refactoring.
-rw-r--r--lisp/ox-odt.el11
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/ox-odt.el b/lisp/ox-odt.el
index ec2be87..386e894 100644
--- a/lisp/ox-odt.el
+++ b/lisp/ox-odt.el
@@ -3801,7 +3801,8 @@ contextual information."
(file-name-nondirectory input-file))))
(display-msg
(case processing-type
- ((dvipng imagemagick) (format "Creating LaTeX Image %d..." count))
+ ((dvipng imagemagick)
+ (format "Creating LaTeX Image %d..." count))
(mathml (format "Creating MathML snippet %d..." count))))
;; Get an Org-style link to PNG image or the MathML
;; file.
@@ -3819,10 +3820,10 @@ contextual information."
(when org-link
;; Conversion succeeded. Parse above Org-style link to
;; a `link' object.
- (let* ((link (org-element-map
- (org-element-parse-secondary-string
- org-link '(paragraph link))
- 'link #'identity info t))
+ (let* ((link
+ (org-element-map
+ (org-element-parse-secondary-string org-link '(link))
+ 'link #'identity info t))
(replacement
(case (org-element-type latex-*)
;; Case 1: LaTeX environment. Mimic