bug#28811: 11.90.2.2017-07-25; preview-at-point

[Thomas Stenhaug]

I'm trying to run preview-at-point in the math-environment in the
following file:

--------------------------------------------------------------
\documentclass{article}
\usepackage[utf8]{inputenc}
\usepackage[T1]{fontenc}
\begin{document}
\begin{math}
1 + 1 = 2
\end{math}
\end{document}
------------------------------------------------------------------------

When positioning the point in the math environment and typing `C-c C-p
C-p', a red sign is displayed, associated with the following Ghostscript
error:

--------------------------------------------------------------
/usr/bin/rungs -dOutputFile\=\(_region_.prv/tmp2625buv/pr1-1.png\) -q -dNOPAUSE 
-DNOPLATFONTS -dPrinted -dTextAlphaBits\=4 -dGraphicsAlphaBits\=4 
-sDEVICE\=png16m -r103.68x103.771
GS>{<</PermitFileReading[(_region_.pdf)(_region_.prv/tmp2625buv/preview.dsc)]>> 
setuserparams .locksafe} stopped pop {DELAYSAFER{.setsafe}if}stopped 
pop/.preview-BP currentpagedevice/BeginPage get dup null eq{pop{pop}bind}if 
def<</BeginPage{currentpagedevice/PageSize get dup 0 get 1 ne exch 1 get 1 ne 
or{.preview-BP 0.980484 0.968765 0.933608 setrgbcolor clippath fill 0.394537 
0.324224 0.437507 setrgbcolor}{pop}ifelse}bind/PageSize[1 
1]>>setpagedevice/preview-do{[count 3 roll save]3 1 roll dup length 0 
eq{pop}{setpagedevice}{ifelse .runandhide}stopped{handleerror quit}if aload pop 
restore}bind def /GS_PDF_ProcSet GS_PDF_ProcSet dup maxlength dict copy dup 
begin/graphicsbeginpage{//graphicsbeginpage exec 0.394537 0.324224 0.437507 3 
copy rg RG}bind store end readonly store 
[(_region_.prv/tmp2625buv/preview.dsc)(r)file]aload exch dup 0 setfileposition 
457()/SubFileDecode filter cvx .runandhide aload pop dup dup 457 
setfileposition 51()/SubFileDecode filter cvx<<>>preview-do
Error: /undefined in .runandhide
Operand stack:
   --nostringval--   --nostringval--
Execution stack:
   %interp_exit   .runexec2   --nostringval--   --nostringval--   
--nostringval--   2   %stopped_push   --nostringval--   --nostringval--   
%loop_continue   --nostringval--   --nostringval--   false   1   %stopped_push  
 .runexec2   --nostringval--   --nostringval--   --nostringval--   2   
%stopped_push   --nostringval--
Dictionary stack:
   --dict:989/1684(ro)(G)--   --dict:0/20(G)--   --dict:80/200(L)--
Current allocation mode is local
Current file position is 902
GS<2>
------------------------------------------------------------------------

Ghostscript is version 9.22. 

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

Emacs  : GNU Emacs 25.3.1 (x86_64-pc-linux-gnu, GTK+ Version 3.22.19)
 of 2017-09-16
Package: 11.90.2.2017-07-25

current state:
==============
(setq
 AUCTeX-date "2017-07-25"
 window-system 'x
 LaTeX-version "2e"
 TeX-style-path '("~/.emacs.d/auctex" 
"/home/thomas/.emacs.d/elpa/auctex-11.91.0/style"
                  "/home/thomas/.emacs.d/auctex/auto" 
"/home/thomas/.emacs.d/auctex/style" "auto" "style")
 TeX-auto-save nil
 TeX-parse-self nil
 TeX-master t
 TeX-command-list '(("TeX" "%(PDF)%(tex) %(file-line-error) %(extraopts) 
%`%S%(PDFout)%(mode)%' %t"
                     TeX-run-TeX nil (plain-tex-mode ams-tex-mode texinfo-mode) 
:help "Run plain TeX")
                    (#("LaTeX" 0 1 (idx 0)) "%`%l%(mode)%' %t" TeX-run-TeX nil 
(latex-mode doctex-mode)
                     :help "Run LaTeX")
                    ("Makeinfo" "makeinfo %(extraopts) %t" TeX-run-compile nil 
(texinfo-mode) :help
                     "Run Makeinfo with Info output")
                    ("Makeinfo HTML" "makeinfo %(extraopts) --html %t" 
TeX-run-compile nil (texinfo-mode)
                     :help "Run Makeinfo with HTML output")
                    ("AmSTeX" "amstex %(PDFout) %(extraopts) %`%S%(mode)%' %t" 
TeX-run-TeX nil
                     (ams-tex-mode) :help "Run AMSTeX")
                    ("ConTeXt" "%(cntxcom) --once --texutil %(extraopts) 
%(execopts)%t" TeX-run-TeX nil
                     (context-mode) :help "Run ConTeXt once")
                    ("ConTeXt Full" "%(cntxcom) %(extraopts) %(execopts)%t" 
TeX-run-TeX nil (context-mode)
                     :help "Run ConTeXt until completion")
                    (#("BibTeX" 0 1 (idx 1)) "bibtex %s" TeX-run-BibTeX nil t 
:help "Run BibTeX")
                    (#("Biber" 0 1 (idx 2)) "biber %s" TeX-run-Biber nil t 
:help "Run Biber")
                    (#("View" 0 1 (idx 3)) "%V" TeX-run-discard-or-function t t 
:help "Run Viewer")
                    (#("Print" 0 1 (idx 4)) "%p" TeX-run-command t t :help 
"Print the file")
                    (#("Queue" 0 1 (idx 5)) "%q" TeX-run-background nil t :help 
"View the printer queue"
                     :visible TeX-queue-command)
                    (#("File" 0 1 (idx 6)) "%(o?)dvips %d -o %f " TeX-run-dvips 
t t :help
                     "Generate PostScript file")
                    (#("Dvips" 0 1 (idx 7)) "%(o?)dvips %d -o %f " 
TeX-run-dvips nil t :help
                     "Convert DVI file to PostScript")
                    (#("Dvipdfmx" 0 1 (idx 8)) "dvipdfmx %d" TeX-run-dvipdfmx 
nil t :help
                     "Convert DVI file to PDF with dvipdfmx")
                    (#("Ps2pdf" 0 1 (idx 9)) "ps2pdf %f" TeX-run-ps2pdf nil t 
:help
                     "Convert PostScript file to PDF")
                    (#("Glossaries" 0 1 (idx 10)) "makeglossaries %s" 
TeX-run-command nil t :help
                     "Run makeglossaries to create glossary file")
                    (#("Index" 0 1 (idx 11)) "makeindex %s" TeX-run-index nil t 
:help
                     "Run makeindex to create index file")
                    (#("upMendex" 0 1 (idx 12)) "upmendex %s" TeX-run-index t t 
:help
                     "Run upmendex to create index file")
                    (#("Xindy" 0 1 (idx 13)) "texindy %s" TeX-run-command nil t 
:help
                     "Run xindy to create index file")
                    (#("Check" 0 1 (idx 14)) "lacheck %s" TeX-run-compile nil 
(latex-mode) :help
                     "Check LaTeX file for correctness")
                    (#("ChkTeX" 0 1 (idx 15)) "chktex -v6 %s" TeX-run-compile 
nil (latex-mode) :help
                     "Check LaTeX file for common mistakes")
                    (#("Spell" 0 1 (idx 16)) "(TeX-ispell-document \"\")" 
TeX-run-function nil t :help
                     "Spell-check the document")
                    (#("Clean" 0 1 (idx 17)) "TeX-clean" TeX-run-function nil t 
:help
                     "Delete generated intermediate files")
                    (#("Clean All" 0 1 (idx 18)) "(TeX-clean t)" 
TeX-run-function nil t :help
                     "Delete generated intermediate and output files")
                    (#("Other" 0 1 (idx 19)) "" TeX-run-command t t :help "Run 
an arbitrary command"))
 )

--
Thomas