From bb951f0e9e5930e053f8491e419ad59a821fed34 Mon Sep 17 00:00:00 2001 From: Ken Raeburn Date: Sun, 1 Jan 2006 11:41:36 +0000 Subject: [PATCH] (Fcall_process_region): Bind file-name-handler-alist to nil for the call to Fwrite_region. --- src/ChangeLog | 5 +++++ src/callproc.c | 3 +++ 2 files changed, 8 insertions(+) diff --git a/src/ChangeLog b/src/ChangeLog index e550604498d..6ad7c939bce 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2006-01-01 Ken Raeburn + + * callproc.c (Fcall_process_region): Bind file-name-handler-alist + to nil for the call to Fwrite_region. + 2005-12-31 Richard M. Stallman * minibuf.c (read_minibuf): Clear out all other minibuffer windows. diff --git a/src/callproc.c b/src/callproc.c index 47930819c07..a9b9d2bff6a 100644 --- a/src/callproc.c +++ b/src/callproc.c @@ -1126,6 +1126,9 @@ usage: (call-process-region START END PROGRAM &optional DELETE BUFFER DISPLAY &r 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); -- 2.39.2