Mercurial > emacs
changeset 56977:87de6585e906
Delete declaration for removed Vauto_save_file_format.
(build_annotations): Adapt to replacement of `auto-save-file-format'
with the new buffer-local variable `buffer-auto-save-file-format'.
(syms_of_fileio): Delete DEFVAR_LISP for auto-save-file-format.
author | Luc Teirlinck <teirllm@auburn.edu> |
---|---|
date | Wed, 08 Sep 2004 02:26:27 +0000 |
parents | b3aa8cb4c381 |
children | 229351c08a59 |
files | src/fileio.c |
diffstat | 1 files changed, 2 insertions(+), 12 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fileio.c Wed Sep 08 02:23:55 2004 +0000 +++ b/src/fileio.c Wed Sep 08 02:26:27 2004 +0000 @@ -173,9 +173,6 @@ whose I/O is done with a special handler. */ Lisp_Object Vfile_name_handler_alist; -/* Format for auto-save files */ -Lisp_Object Vauto_save_file_format; - /* Lisp functions for translating file formats */ Lisp_Object Qformat_decode, Qformat_annotate_function; @@ -5372,8 +5369,8 @@ } /* Now do the same for annotation functions implied by the file-format */ - if (auto_saving && (!EQ (Vauto_save_file_format, Qt))) - p = Vauto_save_file_format; + if (auto_saving && (!EQ (current_buffer->auto_save_file_format, Qt))) + p = current_buffer->auto_save_file_format; else p = current_buffer->file_format; for (i = 0; CONSP (p); p = XCDR (p), ++i) @@ -6491,13 +6488,6 @@ of file names regardless of the current language environment. */); Vdefault_file_name_coding_system = Qnil; - DEFVAR_LISP ("auto-save-file-format", &Vauto_save_file_format, - doc: /* *Format in which to write auto-save files. -Should be a list of symbols naming formats that are defined in `format-alist'. -If it is t, which is the default, auto-save files are written in the -same format as a regular save would use. */); - Vauto_save_file_format = Qt; - Qformat_decode = intern ("format-decode"); staticpro (&Qformat_decode); Qformat_annotate_function = intern ("format-annotate-function");