Mercurial > emacs
changeset 23481:4e3bead33d34
(archive-mode): Locally set file-precious-flag.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 17 Oct 1998 19:21:37 +0000 |
| parents | 2046e6b0bc8e |
| children | 43849bed4a16 |
| files | lisp/arc-mode.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/arc-mode.el Sat Oct 17 15:29:39 1998 +0000 +++ b/lisp/arc-mode.el Sat Oct 17 19:21:37 1998 +0000 @@ -526,6 +526,10 @@ (make-local-variable 'local-enable-local-variables) (setq local-enable-local-variables nil) + ;; Prevent loss of data when saving the file. + (make-local-variable 'file-precious-flag) + (setq file-precious-flag t) + (make-local-variable 'archive-read-only) ;; Archives which are inside other archives and whose ;; names are invalid for this OS, can't be written.