[OS X TeX] AucTeX, simpdftex, dvipdfmx in ECE plugin
Gerben Wierda
Gerben.Wierda at rna.nl
Wed Apr 18 09:10:39 CEST 2007
The next update of gwTeX will contain an updated simpdftex which also
handles dvipdfm(x). It will be compatible with the patched version
simpdftex_dpmx, though in my case the preferred calling interface is
slightly different:
simpdftex latex --mode dvipdfm foo.tex
simpdftex latex --mode dvipdfmx foo.tex
simpdftex latex --mode dvips foo.tex
I have based it on simpdftex_dpmx.
BTW, in "simpdftex_dpmx latex --dpx --maxpfb" as mentioned below, --
maxpfb has no effect as it only works in dvips mode (--maxpfb sets
the dvips -Poutline flag, which has no equivalence in dvipdfm as far
as I can see)
G
On Apr 17, 2007, at 17:53 , Enrico Franconi wrote:
> Hi,
> I have released a new version of the ECE plugin for emacs, which
> now handles simpdftex (for a one shot latex compilation in pdf via
> ps) and dvipdfmx (for a conversion from dvi to pdf dealing with
> different types of included graphics) in a seamless way:
>
> <http://web.inf.unibz.it/~franconi/enhanced-carbon-emacs>.
>
> For the curious people, for comments, and for reproducibility, this
> is the core of the hack (which can be reproduced by using a
> customisation of TeX-expand-list, plus few definitions):
>
> (setq TeX-a4-paper t)
> (setq TeX-view-format "pdf") ;;; "pdf", "ps", "dvi"
> (setq pdf-previewer-program "open")
> (setq ps-previewer-program "open")
> (setq dvi-previewer-program "open -a texniscope")
> (setq simpdflatex-mode nil)
>
> (setq simpdflatex-command "simpdftex_dpmx latex --dpx --maxpfb")
> (defun TeX-dvips-command ()
> (if TeX-a4-paper
> "dvips -ta4 -Ppdf -G0 %d -o %f "
> "dvips -Ppdf -G0 %d -o %f "))
> (defun TeX-dvipdf-command ()
> (if TeX-a4-paper
> "dvipdfmx -p a4 %d"
> "dvipdfmx %d"))
>
> (add-hook
> 'LaTeX-mode-hook
> (function
> (lambda ()
>
> (setq TeX-expand-list
> '(("%p" TeX-printer-query)
> ("%q" (lambda ()
> (TeX-printer-query t)))
> ;; changed EF:
> ("%V" (lambda ()
> (cond (simpdflatex-mode
> (TeX-output-style-check
> (TeX-output-simpdflatex-view-style)))
> ((equal TeX-view-format "dvi")
> (TeX-output-style-check (TeX-output-dvi-view-style)))
> ((equal TeX-view-format "ps")
> (TeX-output-style-check (TeX-output-ps-view-style)))
> ((equal TeX-view-format "pdf")
> (TeX-output-style-check (TeX-output-pdf-view-style)))
> )))
> ("%v" (lambda ()
> (TeX-style-check TeX-view-style)))
> ("%r" (lambda ()
> (TeX-style-check TeX-print-style)))
> ("%l" (lambda ()
> (TeX-style-check LaTeX-command-style)))
> ;; changed EF:
> ("%(PDF)" (lambda ()
> (if (and (not TeX-Omega-mode)
> (not simpdflatex-mode)
> (or TeX-PDF-mode
> TeX-DVI-via-PDFTeX))
> "pdf"
> "")))
> ;; changed EF:
> ("%(PDFout)" (lambda ()
> (if (and (not TeX-Omega-mode)
> (not TeX-PDF-mode)
> (not simpdflatex-mode)
> TeX-DVI-via-PDFTeX)
> " \"\\pdfoutput=0 \""
> "")))
> ;; changed EF:
> ("%(mode)" (lambda ()
> (if (or TeX-interactive-mode
> simpdflatex-mode)
> ""
> " -interaction=nonstopmode")))
> ("%(o?)" (lambda () (if TeX-Omega-mode "o" "")))
> ("%(tex)" (lambda () (if TeX-Omega-mode
> TeX-Omega-command
> TeX-command)))
> ;; changed EF:
> ("%(latex)" (lambda () (if TeX-Omega-mode
> LaTeX-Omega-command
> (if simpdflatex-mode
> simpdflatex-command
> LaTeX-command))))
> ("%(execopts)" ConTeXt-expand-options)
> ;; changed EF:
> ("%S" (lambda () (if simpdflatex-mode
> ""
> (TeX-source-specials-expand-options))))
> ("%dS" TeX-source-specials-view-expand-options)
> ("%cS" TeX-source-specials-view-expand-client)
> ("%(outpage)" (lambda () (if TeX-sync-output-page-function
> (funcall TeX-sync-output-page-function)
> "")))
> ("%s" file nil t)
> ("%t" file t t)
> ("%`" (lambda nil
> (setq TeX-command-pos t TeX-command-text "")))
> (" \"\\" (lambda nil
> (if (eq TeX-command-pos t)
> (setq TeX-command-pos pos
> pos (+ 3 pos))
> (setq pos (1+ pos)))))
> ("\"" (lambda nil (if (numberp TeX-command-pos)
> (setq TeX-command-text
> (concat
> TeX-command-text
> (substring command
> TeX-command-pos
> (1+ pos)))
> command
> (concat
> (substring command
> 0
> TeX-command-pos)
> (substring command
> (1+ pos)))
> pos TeX-command-pos
> TeX-command-pos t)
> (setq pos (1+ pos)))))
> ;; changed EF:
> ("%'" (lambda nil
> (prog1
> (if (and (stringp TeX-command-text)
> (not simpdflatex-mode))
> (progn
> (setq pos (+ (length TeX-command-text) 9)
> TeX-command-pos
> (and (string-match " "
> (funcall file t t))
> "\""))
> (concat TeX-command-text " \"\\input\""))
> (setq TeX-command-pos nil)
> "")
> (setq TeX-command-text nil))))
> ("%n" TeX-current-line)
> ("%d" file "dvi" t)
> ("%f" file "ps" t)
> ("%o" (lambda nil (funcall file (TeX-output-extension) t)))
> ("%b" TeX-current-file-name-master-relative)
> ("%m" preview-create-subdirectory)))
>
> (defun TeX-output-dvi-view-style ()
> `(("^dvi$" "." ,(concat "%(o?)" dvi-previewer-program " %d"))
> ("^pdf$" "." ,(concat "%(o?)" pdf-previewer-program " %s.pdf"))
> ))
>
> (defun TeX-output-ps-view-style ()
> `(("^dvi$" "." ,(concat (TeX-dvips-command) " ; "
> ps-previewer-program " %f"))
> ("^pdf$" "." ,(concat "%(o?)" pdf-previewer-program " %s.pdf"))
> ))
>
> (defun TeX-output-pdf-view-style ()
> `(("^dvi$" "." ,(concat (TeX-dvipdf-command) " ; "
> pdf-previewer-program " %s.pdf"))
> ("^pdf$" "." ,(concat "%(o?)" pdf-previewer-program " %s.pdf"))
> ))
>
> (defun TeX-output-simpdflatex-view-style ()
> `(("." "." ,(concat "%(o?)" pdf-previewer-program " %s.pdf"))
> ))
>
> )))
>
>
> ------------------------- Helpful Info -------------------------
> Mac-TeX Website: http://www.esm.psu.edu/mac-tex/
> TeX FAQ: http://www.tex.ac.uk/faq
> List Archive: http://tug.org/pipermail/macostex-archives/
> List Reminders & Etiquette: http://www.esm.psu.edu/mac-tex/list/
>
>
>
------------------------- Helpful Info -------------------------
Mac-TeX Website: http://www.esm.psu.edu/mac-tex/
TeX FAQ: http://www.tex.ac.uk/faq
List Archive: http://tug.org/pipermail/macostex-archives/
List Reminders & Etiquette: http://www.esm.psu.edu/mac-tex/list/
More information about the macostex-archives
mailing list