Improve make-temp-file performance on local files

* lisp/files.el (make-temp-file): Let make-temp-file-internal do
the work of inserting the text.
* src/fileio.c (Fmake_temp_file_internal): New arg TEXT.
All callers changed.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/filelock.c b/src/filelock.c
index fec9bc044ae..fd4f0aa864e 100644
--- a/src/filelock.c
+++ b/src/filelock.c
@@ -210,7 +210,7 @@ get_boot_time (void)
                  names up to 8 bytes long.  Choose a 2 byte prefix, so
                  the 6-byte suffix does not make the name too long.  */
               filename = Fmake_temp_file_internal (build_string ("wt"), Qnil,
-                                                   empty_unibyte_string);
+                                                   empty_unibyte_string, Qnil);
               CALLN (Fcall_process, build_string ("gzip"), Qnil,
                      list2 (QCfile, filename), Qnil,
                      build_string ("-cd"), tempname);