[Emacs-diffs] Changes to emacs/src/buffer.c

[Luc Teirlinck]

Index: emacs/src/buffer.c
diff -c emacs/src/buffer.c:1.461 emacs/src/buffer.c:1.462
*** emacs/src/buffer.c:1.461    Sat Aug 14 12:49:12 2004
--- emacs/src/buffer.c  Wed Sep  8 02:23:55 2004
***************
*** 694,699 ****
--- 694,700 ----
    b->mark_active = Qnil;
    b->point_before_scroll = Qnil;
    b->file_format = Qnil;
+   b->auto_save_file_format = Qt;
    b->last_selected_window = Qnil;
    XSETINT (b->display_count, 0);
    b->display_time = Qnil;
***************
*** 4962,4967 ****
--- 4963,4969 ----
    buffer_defaults.undo_list = Qnil;
    buffer_defaults.mark_active = Qnil;
    buffer_defaults.file_format = Qnil;
+   buffer_defaults.auto_save_file_format = Qt;
    buffer_defaults.overlays_before = NULL;
    buffer_defaults.overlays_after = NULL;
    buffer_defaults.overlay_center = BEG;
***************
*** 5020,5025 ****
--- 5022,5028 ----
    XSETINT (buffer_local_flags.file_truename, -1);
    XSETINT (buffer_local_flags.invisibility_spec, -1);
    XSETINT (buffer_local_flags.file_format, -1);
+   XSETINT (buffer_local_flags.auto_save_file_format, -1);
    XSETINT (buffer_local_flags.display_count, -1);
    XSETINT (buffer_local_flags.display_time, -1);
    XSETINT (buffer_local_flags.enable_multibyte_characters, -1);
***************
*** 5830,5835 ****
--- 5833,5845 ----
  Formats are defined by `format-alist'.  This variable is
  set when a file is visited.  */);
  
+   DEFVAR_PER_BUFFER ("buffer-auto-save-file-format",
+                    &current_buffer->auto_save_file_format, Qnil,
+                    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.  */);
+ 
    DEFVAR_PER_BUFFER ("buffer-invisibility-spec",
                     &current_buffer->invisibility_spec, Qnil,
                     doc: /* Invisibility spec of this buffer.