37 |
;; change this variable, or use `format-write-file'. |
;; change this variable, or use `format-write-file'. |
38 |
;; |
;; |
39 |
;; Auto-save files are normally created in the same format as the visited |
;; Auto-save files are normally created in the same format as the visited |
40 |
;; file, but the variable `auto-save-file-format' can be set to a |
;; file, but the variable `buffer-auto-save-file-format' can be set to a |
41 |
;; particularly fast or otherwise preferred format to be used for |
;; particularly fast or otherwise preferred format to be used for |
42 |
;; auto-saving (or nil to do no encoding on auto-save files, but then you |
;; auto-saving (or nil to do no encoding on auto-save files, but then you |
43 |
;; risk losing any text-properties in the buffer). |
;; risk losing any text-properties in the buffer). |
62 |
;;; Code: |
;;; Code: |
63 |
|
|
64 |
(put 'buffer-file-format 'permanent-local t) |
(put 'buffer-file-format 'permanent-local t) |
65 |
|
(put 'buffer-auto-save-file-format 'permanent-local t) |
66 |
|
|
67 |
(defvar format-alist |
(defvar format-alist |
68 |
'((text/enriched "Extended MIME text/enriched format." |
'((text/enriched "Extended MIME text/enriched format." |