aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorLuc Teirlinck2004-09-08 02:30:12 +0000
committerLuc Teirlinck2004-09-08 02:30:12 +0000
commitf844ba4efd84606ff612639de472c1ac83e7a2b6 (patch)
tree40b81b789a8198dbe2f0e6b62ef47572656d8236 /src
parent71ed49fa37c34dbedbb38d534a7e6ee0ebdf4832 (diff)
downloademacs-f844ba4efd84606ff612639de472c1ac83e7a2b6.tar.gz
emacs-f844ba4efd84606ff612639de472c1ac83e7a2b6.zip
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.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog15
-rw-r--r--src/fileio.c14
2 files changed, 17 insertions, 12 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 08783ab0f8e..498af248e85 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,18 @@
12004-09-07 Luc Teirlinck <teirllm@auburn.edu>
2
3 * buffer.h (struct buffer): Add auto_save_file_format field.
4
5 * buffer.c (reset_buffer, init_buffer_once): Handle
6 auto_save_file_format field.
7 (syms_of_buffer): Add DEFVAR_PER_BUFFER for
8 `buffer-auto-save-file-format'.
9
10 * fileio.c: Delete declaration for removed Vauto_save_file_format.
11 (build_annotations): Adapt to replacement of
12 `auto-save-file-format' with the new buffer-local variable
13 `buffer-auto-save-file-format'.
14 (syms_of_fileio): Delete DEFVAR_LISP for auto-save-file-format.
15
12004-09-07 Jason Rumney <jasonr@gnu.org> 162004-09-07 Jason Rumney <jasonr@gnu.org>
2 17
3 * w32term.h (AppendMenuW_Proc): Move declaration from w32menu.c. 18 * w32term.h (AppendMenuW_Proc): Move declaration from w32menu.c.
diff --git a/src/fileio.c b/src/fileio.c
index a90111b22b6..e9a6c558e33 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
@@ -5372,8 +5369,8 @@ build_annotations (start, end)
5372 } 5369 }
5373 5370
5374 /* Now do the same for annotation functions implied by the file-format */ 5371 /* Now do the same for annotation functions implied by the file-format */
5375 if (auto_saving && (!EQ (Vauto_save_file_format, Qt))) 5372 if (auto_saving && (!EQ (current_buffer->auto_save_file_format, Qt)))
5376 p = Vauto_save_file_format; 5373 p = current_buffer->auto_save_file_format;
5377 else 5374 else
5378 p = current_buffer->file_format; 5375 p = current_buffer->file_format;
5379 for (i = 0; CONSP (p); p = XCDR (p), ++i) 5376 for (i = 0; CONSP (p); p = XCDR (p), ++i)
@@ -6491,13 +6488,6 @@ instead use `file-name-coding-system' to get a constant encoding
6491of file names regardless of the current language environment. */); 6488of file names regardless of the current language environment. */);
6492 Vdefault_file_name_coding_system = Qnil; 6489 Vdefault_file_name_coding_system = Qnil;
6493 6490
6494 DEFVAR_LISP ("auto-save-file-format", &Vauto_save_file_format,
6495 doc: /* *Format in which to write auto-save files.
6496Should be a list of symbols naming formats that are defined in `format-alist'.
6497If it is t, which is the default, auto-save files are written in the
6498same format as a regular save would use. */);
6499 Vauto_save_file_format = Qt;
6500
6501 Qformat_decode = intern ("format-decode"); 6491 Qformat_decode = intern ("format-decode");
6502 staticpro (&Qformat_decode); 6492 staticpro (&Qformat_decode);
6503 Qformat_annotate_function = intern ("format-annotate-function"); 6493 Qformat_annotate_function = intern ("format-annotate-function");