Hi Al,

Thanks, please see attached.

Paul

>From 63359633cf6df26ab8c767f4eeca9ae1e4a029e4 Mon Sep 17 00:00:00 2001
From: Paul Nelson <[email protected]>
Date: Tue, 17 Feb 2026 11:13:44 +0100
Subject: [PATCH] preview.el: Pass correct ps-file in gs/dvips setup

* preview.el (preview-gs-dvips-process-setup): Use the ps-file
returned by 'preview-start-dvips'.
---
 preview.el | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/preview.el b/preview.el
index 8b757c84..d4977e65 100644
--- a/preview.el
+++ b/preview.el
@@ -958,11 +958,16 @@ START is the function that actually starts the process with
 
 (defun preview-gs-dvips-process-setup ()
   "Set up Dvips process for conversions via gs."
-  (preview-dvi*-process-setup-1
-   preview-gs-image-type
-   (lambda ()
-     (preview-start-dvips preview-fast-conversion))
-   #'preview-gs-dvips-sentinel))
+  (let ((ret
+         (preview-dvi*-process-setup-1
+          preview-gs-image-type
+          (lambda ()
+            (preview-start-dvips preview-fast-conversion))
+          #'preview-gs-dvips-sentinel)))
+    ;; Override the dvi* sentinel value t with the actual file, set by
+    ;; `preview-start-dvips' in `preview-ps-file'.
+    (setf (nth 3 ret) preview-ps-file)
+    ret))
 
 (defun preview-dvi*-process-setup ()
   "Set up dvi conversion process."
-- 
2.50.1 (Apple Git-155)

_______________________________________________
bug-auctex mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/bug-auctex

Reply via email to