aboutsummaryrefslogtreecommitdiffstats
path: root/src/fileio.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/fileio.c')
-rw-r--r--src/fileio.c14
1 files changed, 2 insertions, 12 deletions
diff --git a/src/fileio.c b/src/fileio.c
index 8290f01b58e..f3678cac0e5 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -173,9 +173,6 @@ Lisp_Object Vdefault_file_name_coding_system;
173 whose I/O is done with a special handler. */ 173 whose I/O is done with a special handler. */
174Lisp_Object Vfile_name_handler_alist; 174Lisp_Object Vfile_name_handler_alist;
175 175
176/* Format for auto-save files */
177Lisp_Object Vauto_save_file_format;
178
179/* Lisp functions for translating file formats */ 176/* Lisp functions for translating file formats */
180Lisp_Object Qformat_decode, Qformat_annotate_function; 177Lisp_Object Qformat_decode, Qformat_annotate_function;
181 178
@@ -5313,8 +5310,8 @@ build_annotations (start, end)
5313 } 5310 }
5314 5311
5315 /* Now do the same for annotation functions implied by the file-format */ 5312 /* Now do the same for annotation functions implied by the file-format */
5316 if (auto_saving && (!EQ (Vauto_save_file_format, Qt))) 5313 if (auto_saving && (!EQ (current_buffer->auto_save_file_format, Qt)))
5317 p = Vauto_save_file_format; 5314 p = current_buffer->auto_save_file_format;
5318 else 5315 else
5319 p = current_buffer->file_format; 5316 p = current_buffer->file_format;
5320 for (i = 0; CONSP (p); p = XCDR (p), ++i) 5317 for (i = 0; CONSP (p); p = XCDR (p), ++i)
@@ -6404,13 +6401,6 @@ instead use `file-name-coding-system' to get a constant encoding
6404of file names regardless of the current language environment. */); 6401of file names regardless of the current language environment. */);
6405 Vdefault_file_name_coding_system = Qnil; 6402 Vdefault_file_name_coding_system = Qnil;
6406 6403
6407 DEFVAR_LISP ("auto-save-file-format", &Vauto_save_file_format,
6408 doc: /* *Format in which to write auto-save files.
6409Should be a list of symbols naming formats that are defined in `format-alist'.
6410If it is t, which is the default, auto-save files are written in the
6411same format as a regular save would use. */);
6412 Vauto_save_file_format = Qt;
6413
6414 Qformat_decode = intern ("format-decode"); 6404 Qformat_decode = intern ("format-decode");
6415 staticpro (&Qformat_decode); 6405 staticpro (&Qformat_decode);
6416 Qformat_annotate_function = intern ("format-annotate-function"); 6406 Qformat_annotate_function = intern ("format-annotate-function");