]> git.eshelyaron.com Git - emacs.git/commitdiff
Let 'tex-view' show PDFs made without a DVI (bug#73854)
authorStephen Berman <stephen.berman@gmx.net>
Mon, 21 Oct 2024 10:50:53 +0000 (12:50 +0200)
committerEshel Yaron <me@eshelyaron.com>
Tue, 22 Oct 2024 19:02:30 +0000 (21:02 +0200)
* lisp/textmodes/tex-mode.el (tex-print-file): Update doc string
to mention 'tex-compile'.
(tex-compile-commands): Add entries for 'evince' and 'mupdf'.
(tex-compile): Set 'tex-print-file'.

(cherry picked from commit 1f8fbae8df764e9d24f1b824de7369d82e36abae)

lisp/textmodes/tex-mode.el

index f2787936599b0e6b61bfcf24d48473c166bed9d3..8f10f37b957fa40d1e074c7577c82c322ed66cbc 100644 (file)
@@ -310,7 +310,7 @@ Should be a simple file name with no extension or directory specification.")
 
 (defvar tex-print-file nil
   "File name that \\[tex-print] prints.
-Set by \\[tex-region], \\[tex-buffer], and \\[tex-file].")
+Set by \\[tex-region], \\[tex-buffer], \\[tex-file] and \\[tex-compile].")
 
 (defvar tex-mode-syntax-table
   (let ((st (make-syntax-table)))
@@ -2212,6 +2212,8 @@ If NOT-ALL is non-nil, save the `.dvi' file."
      t "%r.dvi")
     ("xdvi %r &" "%r.dvi")
     ("\\doc-view \"%r.pdf\"" "%r.pdf")
+    ("evince %r.pdf &" "%r.pdf")
+    ("mupdf %r.pdf &" "%r.pdf")
     ("xpdf %r.pdf &" "%r.pdf")
     ("gv %r.ps &" "%r.ps")
     ("yap %r &" "%r.dvi")
@@ -2530,6 +2532,7 @@ Only applies the FSPEC to the args part of FORMAT."
       (if (tex-shell-running)
           (tex-kill-job)
         (tex-start-shell))
+      (setq tex-print-file (expand-file-name (tex-main-file)))
       (tex-send-tex-command cmd dir))))
 
 (defun tex-start-tex (command file &optional dir)