ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-latex.el: Bugfix: run export commands from the right buffer.

This commit is contained in:
Bastien Guerry 2011-07-16 19:08:40 +02:00
parent b93da58e1f
commit b9d5e7e85e
1 changed files with 22 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-latex.el
View File

@ -1043,6 +1043,8 @@ when PUB-DIR is set, use this as the publishing directory."
(with-current-buffer outbuf (erase-buffer)) (with-current-buffer outbuf (erase-buffer))
(message (concat "Processing LaTeX file " file "...")) (message (concat "Processing LaTeX file " file "..."))
(setq output-dir (file-name-directory file)) (setq output-dir (file-name-directory file))
(with-current-buffer lbuf
(save-excursion
(if (and cmds (symbolp cmds)) (if (and cmds (symbolp cmds))
(funcall cmds (shell-quote-argument file)) (funcall cmds (shell-quote-argument file))
(while cmds (while cmds
@ -1062,7 +1064,7 @@ when PUB-DIR is set, use this as the publishing directory."
(save-match-data (save-match-data
(shell-quote-argument output-dir)) (shell-quote-argument output-dir))
t t cmd))) t t cmd)))
(shell-command cmd outbuf))) (shell-command cmd outbuf)))))
(message (concat "Processing LaTeX file " file "...done")) (message (concat "Processing LaTeX file " file "...done"))
(setq errors (org-export-latex-get-error outbuf)) (setq errors (org-export-latex-get-error outbuf))
(if (not (file-exists-p pdffile)) (if (not (file-exists-p pdffile))