diff options
| author | Luc Teirlinck | 2004-09-08 02:30:12 +0000 |
|---|---|---|
| committer | Luc Teirlinck | 2004-09-08 02:30:12 +0000 |
| commit | f844ba4efd84606ff612639de472c1ac83e7a2b6 (patch) | |
| tree | 40b81b789a8198dbe2f0e6b62ef47572656d8236 /src | |
| parent | 71ed49fa37c34dbedbb38d534a7e6ee0ebdf4832 (diff) | |
| download | emacs-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/ChangeLog | 15 | ||||
| -rw-r--r-- | src/fileio.c | 14 |
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 @@ | |||
| 1 | 2004-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 | |||
| 1 | 2004-09-07 Jason Rumney <jasonr@gnu.org> | 16 | 2004-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. */ |
| 174 | Lisp_Object Vfile_name_handler_alist; | 174 | Lisp_Object Vfile_name_handler_alist; |
| 175 | 175 | ||
| 176 | /* Format for auto-save files */ | ||
| 177 | Lisp_Object Vauto_save_file_format; | ||
| 178 | |||
| 179 | /* Lisp functions for translating file formats */ | 176 | /* Lisp functions for translating file formats */ |
| 180 | Lisp_Object Qformat_decode, Qformat_annotate_function; | 177 | Lisp_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 | |||
| 6491 | of file names regardless of the current language environment. */); | 6488 | of 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. | ||
| 6496 | Should be a list of symbols naming formats that are defined in `format-alist'. | ||
| 6497 | If it is t, which is the default, auto-save files are written in the | ||
| 6498 | same 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"); |