diff --git a/collects/scribble/latex-render.rkt b/collects/scribble/latex-render.rkt index d722697d..e1f006bb 100644 --- a/collects/scribble/latex-render.rkt +++ b/collects/scribble/latex-render.rkt @@ -254,7 +254,7 @@ (ftag (convert e 'eps-bytes) ".ps") (ftag (convert e 'png-bytes) ".png")))) => (lambda (bstr+suffix) - (let ([fn (install-file (format "pict.~a" (cadr bstr+suffix)) + (let ([fn (install-file (format "pict~a" (cadr bstr+suffix)) (car bstr+suffix))]) (printf "\\includegraphics{~a}" fn)))] [else