forked from mirrors/org-mode
org-latex-preview: Run dvipng concurrently
* lisp/org-latex-preview.el (org-create-formula-image-async): When using dvipng with the "--follow" flag, image processing can occur concurrently, so we may as well check for this case and start it concurrently when this occurs.
This commit is contained in:
parent
82ac33c1d7
commit
c230fef02b
|
@ -584,8 +584,11 @@ MOVEFILES."
|
||||||
(org-latex-preview--tex-compile-async extended-info))
|
(org-latex-preview--tex-compile-async extended-info))
|
||||||
(img-extract-async
|
(img-extract-async
|
||||||
(org-latex-preview--image-extract-async extended-info)))
|
(org-latex-preview--image-extract-async extended-info)))
|
||||||
(plist-put (cdr tex-compile-async) :success img-extract-async)
|
(if (and (eq processing-type 'dvipng)
|
||||||
(plist-put (cdr tex-compile-async) :failure img-extract-async)
|
(member "--follow" (car img-extract-async)))
|
||||||
|
(apply #'org-async-call img-extract-async)
|
||||||
|
(plist-put (cdr tex-compile-async) :success img-extract-async)
|
||||||
|
(plist-put (cdr tex-compile-async) :failure img-extract-async))
|
||||||
(plist-put (cdr img-extract-async) :success
|
(plist-put (cdr img-extract-async) :success
|
||||||
#'org-latex-preview--cleanup-callback)
|
#'org-latex-preview--cleanup-callback)
|
||||||
(apply #'org-async-call tex-compile-async))))
|
(apply #'org-async-call tex-compile-async))))
|
||||||
|
|
Loading…
Reference in New Issue