From: Chong Yidong Date: Thu, 16 Dec 2010 01:11:21 +0000 (+0800) Subject: Use make-temp-file in rst.el (Bug#7646). X-Git-Tag: emacs-pretest-23.2.92~54 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c1cf05f4bb18bf2ded3d1cc5991f15c2dd6ead81;p=emacs.git Use make-temp-file in rst.el (Bug#7646). * textmodes/rst.el (rst-compile-pdf-preview) (rst-compile-slides-preview): Use make-temp-file. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f6b836d5bed..8eda1582948 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-12-16 Chong Yidong + + * textmodes/rst.el (rst-compile-pdf-preview) + (rst-compile-slides-preview): Use make-temp-file (Bug#7646). + 2010-12-15 Kevin Gallagher * emulation/edt-mapper.el: Override mapping of function keys so diff --git a/lisp/textmodes/rst.el b/lisp/textmodes/rst.el index 3f21fbe7a2c..8a4c06ba150 100644 --- a/lisp/textmodes/rst.el +++ b/lisp/textmodes/rst.el @@ -3307,7 +3307,7 @@ or of the entire buffer, if the region is not selected." (defun rst-compile-pdf-preview () "Convert the document to a PDF file and launch a preview program." (interactive) - (let* ((tmp-filename "/tmp/out.pdf") + (let* ((tmp-filename (make-temp-file "rst-out" nil ".pdf")) (command (format "rst2pdf.py %s %s && %s %s" buffer-file-name tmp-filename rst-pdf-program tmp-filename))) @@ -3322,7 +3322,7 @@ or of the entire buffer, if the region is not selected." (defun rst-compile-slides-preview () "Convert the document to an S5 slide presentation and launch a preview program." (interactive) - (let* ((tmp-filename "/tmp/slides.html") + (let* ((tmp-filename (make-temp-file "rst-slides" nil ".html")) (command (format "rst2s5.py %s %s && %s %s" buffer-file-name tmp-filename rst-slides-program tmp-filename)))