auctex-diffs
[Top][All Lists]
Advanced

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

[AUCTeX-diffs] GNU AUCTeX branch, master, updated. 06226ea5e95de16250c18


From: Ikumi Keita
Subject: [AUCTeX-diffs] GNU AUCTeX branch, master, updated. 06226ea5e95de16250c18ec3fd033f96237fa642
Date: Sat, 10 Nov 2018 03:56:30 -0500 (EST)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU AUCTeX".

The branch, master has been updated
       via  06226ea5e95de16250c18ec3fd033f96237fa642 (commit)
      from  c8a8d475d5a5c826c02313937e2bf09cca3fe057 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 06226ea5e95de16250c18ec3fd033f96237fa642
Author: Ikumi Keita <address@hidden>
Date:   Wed Oct 31 02:44:20 2018 +0900

    Adjust preview-latex in case sub file isn't in master directory
    
    * preview.el.in (preview-dvips-abort):
    (preview-gs-dvips-sentinel):
    (preview-dvipng-place-all): Make sure directory part of dvi file to be
    deleted is removed because deletion takes place in master directory.
    (preview-start-pdf2dsc): Make sure directory part of pdf file is
    removed so that path for later use is constructed correctly.
    (preview-cache-preamble):
    (preview-region):
    (preview-document): Retain directory part of the file name to be
    passed to `preview-generate-preview' because `TeX-run-command' in
    `TeX-inline-preview-internal' doesn't recognize the right path
    otherwise.
    (preview-generate-preview): Adjust in accord with the above change.

diff --git a/preview.el.in b/preview.el.in
index dd32c69..cfb3300 100644
--- a/preview.el.in
+++ b/preview.el.in
@@ -860,7 +860,7 @@ Pure borderless black-on-white will return an empty string."
       (delete-file
        (let ((gsfile preview-gs-file))
         (with-current-buffer TeX-command-buffer
-          (funcall (car gsfile) "dvi"))))
+          (funcall (car gsfile) "dvi" t))))
     (file-error nil))
   (when preview-ps-file
       (condition-case nil
@@ -884,7 +884,7 @@ The usual PROCESS and COMMAND arguments for
               (condition-case nil
                   (delete-file
                    (with-current-buffer TeX-command-buffer
-                     (funcall (car gsfile) "dvi")))
+                     (funcall (car gsfile) "dvi" t)))
                 (file-error nil))
               (if preview-ps-file
                   (preview-prepare-fast-conversion))
@@ -1933,7 +1933,7 @@ Deletes the dvi file when finished."
          (let ((gsfile preview-gs-file))
            (delete-file
             (with-current-buffer TeX-command-buffer
-              (funcall (car gsfile) "dvi"))))
+              (funcall (car gsfile) "dvi" t))))
        (file-error nil)))))
 
 (defun preview-active-string (ov)
@@ -3149,7 +3149,7 @@ If FAST is set, do a fast conversion."
                        (TeX-command-expand preview-pdf2dsc-command
                                            (car file))
                      (setq tempdir TeX-active-tempdir
-                           pdfsource (funcall `,(car file) "pdf")))))
+                           pdfsource (funcall (car file) "pdf" t)))))
         (name "Preview-PDF2DSC"))
     (setq TeX-active-tempdir tempdir)
     (setq preview-ps-file (preview-attach-filename
@@ -3350,7 +3350,7 @@ If FORMAT-CONS is non-nil, a previous format may get 
reused."
       (TeX-save-document master)
       (prog1
          (preview-generate-preview
-          nil (file-name-nondirectory master)
+          nil master
           command)
        (add-hook 'kill-emacs-hook #'preview-cleanout-tempfiles t)
        (setq TeX-sentinel-function
@@ -3399,7 +3399,7 @@ stored in `preview-dumped-alist'."
                            (save-excursion
                              (goto-char begin)
                              (if (bolp) 0 -1))))))
-  (preview-generate-preview t (TeX-region-file nil t)
+  (preview-generate-preview t (TeX-region-file)
                            (preview-do-replacements
                             (TeX-command-expand
                              (preview-string-expand preview-LaTeX-command)
@@ -3439,7 +3439,7 @@ stored in `preview-dumped-alist'."
   (interactive)
   (TeX-save-document (TeX-master-file))
   (preview-generate-preview
-   nil (TeX-master-file nil t)
+   nil (TeX-master-file)
    (preview-do-replacements
     (TeX-command-expand
      (preview-string-expand preview-LaTeX-command)
@@ -3479,7 +3479,7 @@ environments is selected."
 (defun preview-generate-preview (region-p file command)
   "Generate a preview.
 REGION-P is the region flag, FILE the file (without default
-extension and directory), COMMAND is the command to use.
+extension), COMMAND is the command to use.
 
 It returns the started process."
   (setq TeX-current-process-region-p region-p)
@@ -3489,7 +3489,7 @@ It returns the started process."
                   (if TeX-current-process-region-p
                       'TeX-region-file
                     'TeX-master-file)
-                  file))
+                  (file-name-nondirectory file)))
         (master (TeX-master-file))
         (master-file (expand-file-name master))
         (dumped-cons (assoc master-file

-----------------------------------------------------------------------

Summary of changes:
 preview.el.in | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)


hooks/post-receive
-- 
GNU AUCTeX



reply via email to

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