changeset 57668:d9dc84198059

(process-file): Accept nil for INFILE. Reported by Luc Teirlinck.
author Kai Großjohann <kgrossjo@eu.uu.net>
date Sun, 24 Oct 2004 09:06:05 +0000
parents 74daa791cabe
children afb6ef71b1ec
files lisp/ChangeLog lisp/simple.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sun Oct 24 03:58:24 2004 +0000
+++ b/lisp/ChangeLog	Sun Oct 24 09:06:05 2004 +0000
@@ -1,3 +1,8 @@
+2004-10-24  Kai Grossjohann  <kai.grossjohann@gmx.net>
+
+	* simple.el (process-file): Accept nil for INFILE.  Reported by
+	Luc Teirlinck.
+
 2004-10-24  Masatake YAMATO  <jet@gyve.org>
 
 	* progmodes/gdb-ui.el (gdb-assembler-font-lock-keywords): Handle
--- a/lisp/simple.el	Sun Oct 24 03:58:24 2004 +0000
+++ b/lisp/simple.el	Sun Oct 24 09:06:05 2004 +0000
@@ -1899,7 +1899,7 @@
         lc stderr-file)
     (unwind-protect
         (if fh (apply fh 'process-file program infile buffer display args)
-          (setq lc (file-local-copy infile))
+          (when infile (setq lc (file-local-copy infile)))
           (setq stderr-file (when (and (consp buffer) (stringp (cadr buffer)))
                               (make-temp-file "emacs"))))
       (prog1