diff options
Diffstat (limited to 'app-emacs/auctex/files/auctex-11.86-ghostscript9.patch')
| -rw-r--r-- | app-emacs/auctex/files/auctex-11.86-ghostscript9.patch | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/app-emacs/auctex/files/auctex-11.86-ghostscript9.patch b/app-emacs/auctex/files/auctex-11.86-ghostscript9.patch new file mode 100644 index 000000000000..e8ca32b183d8 --- /dev/null +++ b/app-emacs/auctex/files/auctex-11.86-ghostscript9.patch @@ -0,0 +1,42 @@ +http://bugs.gentoo.org/351774 +Patch from upstream CVS + +--- auctex-11.86-orig/preview/preview.el ++++ auctex-11.86/preview/preview.el +@@ -355,7 +355,7 @@ + :group 'preview-gs + :type 'string) + +-(defcustom preview-gs-options '("-q" "-dSAFER" "-dNOPAUSE" ++(defcustom preview-gs-options '("-q" "-dDELAYSAFER" "-dNOPAUSE" + "-DNOPLATFONTS" "-dPrinted" + "-dTextAlphaBits=4" + "-dGraphicsAlphaBits=4") +@@ -1066,14 +1066,21 @@ + + (defun preview-prepare-fast-conversion () + "This fixes up all parameters for fast conversion." +- (let ((file (if (consp (car preview-ps-file)) +- (if (consp (caar preview-ps-file)) +- (car (last (caar preview-ps-file))) +- (caar preview-ps-file)) +- (car preview-ps-file)))) ++ (let* ((file (if (consp (car preview-ps-file)) ++ (if (consp (caar preview-ps-file)) ++ (car (last (caar preview-ps-file))) ++ (caar preview-ps-file)) ++ (car preview-ps-file))) ++ (all-files (if (and (consp (car preview-ps-file)) ++ (consp (caar preview-ps-file))) ++ (caar preview-ps-file) ++ (list file)))) + (setq preview-gs-dsc (preview-dsc-parse file)) + (setq preview-gs-init-string +- (concat preview-gs-init-string ++ (concat (format "{<</PermitFileReading[%s]>> setuserparams \ ++.locksafe} stopped pop " ++ (mapconcat 'preview-ps-quote-filename all-files "")) ++ preview-gs-init-string + (format "[%s(r)file]aload exch %s .runandhide aload pop " + (preview-ps-quote-filename file) + (preview-gs-dsc-cvx 0 preview-gs-dsc)))))) |