[Emacs-diffs] /srv/bzr/emacs/trunk r111288: * simple.el (process-file): Overwrite stderr file, if exists.

[Michael Albinus]

------------------------------------------------------------
revno: 111288
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Fri 2012-12-21 09:10:26 +0100
message:
  * simple.el (process-file): Overwrite stderr file, if exists.
modified:
  lisp/ChangeLog
  lisp/simple.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-12-21 07:51:33 +0000
+++ b/lisp/ChangeLog    2012-12-21 08:10:26 +0000
@@ -1,3 +1,7 @@
+2012-12-21  Michael Albinus  <address@hidden>
+
+       * simple.el (process-file): Overwrite stderr file, if exists.
+
 2012-12-21  Daiki Ueno  <address@hidden>
 
        * epg.el (epg--start): Print GPG_AGENT_INFO in the debug buffer.

=== modified file 'lisp/simple.el'
--- a/lisp/simple.el    2012-12-21 05:42:59 +0000
+++ b/lisp/simple.el    2012-12-21 08:10:26 +0000
@@ -2804,7 +2804,7 @@
                      (or lc infile)
                      (if stderr-file (list (car buffer) stderr-file) buffer)
                      display args)
-            (when stderr-file (copy-file stderr-file (cadr buffer)))))
+            (when stderr-file (copy-file stderr-file (cadr buffer) t))))
       (when stderr-file (delete-file stderr-file))
       (when lc (delete-file lc)))))