Re: [AUCTeX-devel] [gs-devel] Asking help for preview-latex

[Ikumi Keita]

>>>>> David Kastrup <address@hidden> writes:
>>> The test would be something like
>> 
>>> /GS_PDF_ProcSet where { pop [put old code here] } if
>> 
>> Do you mean that the patch listed below should work?

> No.  The brackets in [put old code here] were part of the description,
> not of the code.

Thanks, but the code without those brackets as listed below still gives
the same error for me.
I'm now working on a slightly different approach attached with this
message.  The option `preview-pdf-color-adjust-method' determines the
way how preview-latex works:

(1) New method using DELAYBIND
    Good for gs > 9.27
    Fail with gs <= 9.27
(2) Traditional method
    Good for gs < 9.27
    Fail with gs >= 9.27 if foreground color isn't trivial
(3) Fixed "black on white" appearance
    Fallback for gs 9.27 with non-trivial foreground color

Regards,
Ikumi Keita

----- failed patch --------------------------------------------------
diff --git a/preview.el.in b/preview.el.in
index 30bf45bf..cbfeaf11 100644
--- a/preview.el.in
+++ b/preview.el.in
@@ -750,10 +750,12 @@ to Ghostscript floats."
   (let ((fg (aref colors 1)))
     (if fg
        (concat
+        "/GS_PDF_ProcSet where { pop "
         "/GS_PDF_ProcSet GS_PDF_ProcSet dup maxlength dict copy dup begin\
 /graphicsbeginpage{//graphicsbeginpage exec "
         (mapconcat #'preview-gs-color-value fg " ")
-        " 3 copy rg RG}bind store end readonly store "))))
+        " 3 copy rg RG}bind store end readonly store "
+        "} if "))))
 
 (defun preview-gs-color-string (colors)
   "Return a string setting up colors"

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

diff
Description: attachment