changeset 67967:5936baa93f63

(Fcall_process_region): Bind file-name-handler-alist to nil for the call to Fwrite_region.
author Ken Raeburn <raeburn@raeburn.org>
date Sun, 01 Jan 2006 11:41:00 +0000
parents f0f4b3a82887
children 4a0f6ab2fb20
files src/callproc.c
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/callproc.c	Sun Jan 01 07:55:21 2006 +0000
+++ b/src/callproc.c	Sun Jan 01 11:41:00 2006 +0000
@@ -1126,6 +1126,9 @@
     int count1 = SPECPDL_INDEX ();
 
     specbind (intern ("coding-system-for-write"), val);
+    /* POSIX lets mk[s]temp use "."; don't invoke jka-compr if we
+       happen to get a ".Z" suffix.  */
+    specbind (intern ("file-name-handler-alist"), Qnil);
     Fwrite_region (start, end, filename_string, Qnil, Qlambda, Qnil, Qnil);
 
     unbind_to (count1, Qnil);