[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

LaTeX PDF and Acrobat

From: Dr. F.C.Caner
Subject: LaTeX PDF and Acrobat
Date: 20 Jun 2003 02:04:34 -0700

Hello all,

Here is the final version of Lisp code which 
(1) closes all the documents in the Acrobat window
(2) runs LaTeX Pdf
(3) opens the newly produced pdf file in the Acrobat window right
after LaTeX Pdf is done with compiling.

It is a very useful feature for those who use LaTeX Pdf on a Windows
system. It must be inserted into tex-site.el. Finally, TeX-run-LaTeX
that runs LaTeX Pdf in the TeX-command-list must be changed into
TeX-run-pdfLaTeX as shown below in the same file.

(defvar TeX-command-list
   (list "LaTeX PDF" "pdflatex '\\nonstopmode\\input{%t}'"
         'TeX-run-pdfLaTeX nil t)


;;; This function is by von Jesper Harder:
(defun acrobat-close-all-docs ()
  "Close all open documents in Acrobat."
    (set-buffer (get-buffer-create " *ddeclient*"))
    (insert "[CloseAllDocs()]")
    (call-process-region (point-min) (point-max)
       "c:/EmacsPlugins/ddeclient/ddeclient" t t nil "acroview"
    (if (= 0 (string-to-int (buffer-string))) t nil)))

(defun acrobat-open-doc (process event)
  "Open file in Acrobat."
    (set-buffer (get-buffer-create " *ddeclient*"))
    (insert (concat "[FileOpenEx(\"" file1 ".pdf\")]"))
    (call-process-region (point-min) (point-max)
       "c:/EmacsPlugins/ddeclient/ddeclient" t t nil "acroview"
    (if (= 0 (string-to-int (buffer-string))) t nil)

(defvar file1 "")

(defun TeX-run-pdfLaTeX (name command file)
  "Create a process for NAME using COMMAND to format FILE with
  (setq file1 file)
  (TeX-run-LaTeX name command file)
  (set-process-sentinel (get-process "LaTeX PDF") 'acrobat-open-doc)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]