rpm/emacs-auctex
SHA256
1
0
Fork 0
forked from pool/emacs-auctex
Code Pull Requests Activity

Accepting request 50473 from editors

Browse Source 
checked in (request 50473)

OBS-URL: https://build.opensuse.org/request/show/50473
OBS-URL: https://build.opensuse.org/package/show/editors/emacs-auctex?expand=0&rev=12
This commit is contained in:
OBS User autobuild 2010-10-13 22:54:25 +00:00 committed by Git OBS Bridge
parent 2f6de88345
commit 994a754581
2 changed files with 5 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
auctex-11.85-preview.dif
View File

@ -1,17 +1,6 @@
--- preview/preview.el
+++ preview/preview.el 2010-10-13 10:01:38.999927331 +0000
@@ -369,6 +369,10 @@ See also `preview-gs-command'."
Buffer-local to the appropriate TeX process buffer.")
(make-variable-buffer-local 'preview-gs-queue)
+(defvar preview-pdf-filename ""
+ "Name of the PDF file used for preview.")
+(make-variable-buffer-local 'preview-pdf-filename)
+
(defvar preview-gs-outstanding nil
"Overlays currently processed.")
(make-variable-buffer-local 'preview-gs-outstanding)
@@ -704,7 +708,7 @@ Gets the usual PROCESS and STRING parame
+++ 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 "")
@ -20,7 +9,7 @@
(set-process-sentinel process #'preview-gs-sentinel)
(set-process-filter process #'preview-gs-filter)
(process-send-string process preview-gs-init-string)
@@ -1072,6 +1076,13 @@ NONREL is not NIL."
@@ -1072,6 +1072,12 @@ NONREL is not NIL."
(caar preview-ps-file))
(car preview-ps-file))))
(setq preview-gs-dsc (preview-dsc-parse file))
@ -28,17 +17,8 @@
+ (append (list "-dDELAYSAFER")
+ (remove "-dSAFER" preview-gs-command-line)
+ (list "-c"
+ (format "<</PermitFileReading[%s %s]>> setuserparams .locksafe"
+ (preview-ps-quote-filename file)
+ (preview-ps-quote-filename preview-pdf-filename)))))
+ (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 "
@@ -3100,6 +3111,7 @@ If FAST is set, do a fast conversion."
(setq tempdir TeX-active-tempdir
pdfsource (funcall `,(car file) "pdf")))))
(name "Preview-PDF2DSC"))
+ (setq preview-pdf-filename pdfsource)
(setq TeX-active-tempdir tempdir)
(setq preview-ps-file (preview-attach-filename
pdfsource

6
emacs-auctex.changes
View File

@ -1,9 +1,3 @@
-------------------------------------------------------------------
Wed Oct 13 12:09:48 CEST 2010 - werner@suse.de
- Allow also to read PDF file its self to be able to generate the
descriptions of those file (based on patch of Dieter Jurzitza)
-------------------------------------------------------------------
Wed Aug 11 18:58:43 CEST 2010 - werner@suse.de