diff lisp/subr.el @ 95366:52e3cee99f90

* progmodes/flymake.el (flymake-save-buffer-in-file): * shadowfile.el (shadow-copy-file): * arc-mode.el (archive-*-write-file-member): * files.el (diff-buffer-with-file): * subr.el (with-temp-file): Pass nil to write-region. * jka-compr.el (jka-compr-write-region): Preserve `start's nullness.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 28 May 2008 17:35:34 +0000
parents 4520f20e7dd1
children 5be5ad6047d1
line wrap: on
line diff
--- a/lisp/subr.el	Wed May 28 16:13:20 2008 +0000
+++ b/lisp/subr.el	Wed May 28 17:35:34 2008 +0000
@@ -2562,8 +2562,7 @@
 	       (with-current-buffer ,temp-buffer
 		 ,@body)
 	     (with-current-buffer ,temp-buffer
-	       (widen)
-	       (write-region (point-min) (point-max) ,temp-file nil 0)))
+	       (write-region nil nil ,temp-file nil 0)))
 	 (and (buffer-name ,temp-buffer)
 	      (kill-buffer ,temp-buffer))))))