diff src/fileio.c @ 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 c1b935408a2e
children 4c14357ffc27 42acc7fa8a4f cce1c0ee76ee
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");