Mercurial > emacs

diff lisp/arc-mode.el @ 23481:4e3bead33d34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(archive-mode): Locally set file-precious-flag.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 Oct 1998 19:21:37 +0000
parents dd5bbd8db2f5
children b3c0f3ad64d8
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.