File auctex-11.85-preview.dif of Package emacs-auctex

Overview Repositories Revisions Requests Users Attributes Meta

File auctex-11.85-preview.dif of Package emacs-auctex (Revision 92b00b81a582dd9942037fd039fc8527)

Currently displaying revision 92b00b81a582dd9942037fd039fc8527 , Show latest

--- preview/preview.el
+++ preview/preview.el	2010-08-12 09:13:54.697159903 +0000
@@ -704,7 +704,7 @@ Gets the usual PROCESS and STRING parame
 					 preview-gs-command-line)
 					" ") "''\n")
       (setq preview-gs-answer "")
-      (process-kill-without-query process)
+      (set-process-query-on-exit-flag process nil)
       (set-process-sentinel process #'preview-gs-sentinel)
       (set-process-filter process #'preview-gs-filter)
       (process-send-string process preview-gs-init-string)
@@ -1072,6 +1072,12 @@ NONREL is not NIL."
 		    (caar preview-ps-file))
 		(car preview-ps-file))))
     (setq preview-gs-dsc (preview-dsc-parse file))
+    (setq preview-gs-command-line
+	  (append (list "-dDELAYSAFER")
+	   (remove "-dSAFER" preview-gs-command-line)
+	   (list "-c"
+	    (format "<</PermitFileReading[%s]>> setuserparams .locksafe"
+		     (preview-ps-quote-filename file)))))
     (setq preview-gs-init-string
 	  (concat preview-gs-init-string
 		  (format "[%s(r)file]aload exch %s .runandhide aload pop "

Places

File auctex-11.85-preview.dif of Package emacs-auctex (Revision 92b00b81a582dd9942037fd039fc8527)

Places