From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 24 Jan 2002 18:56:45 +0000 (+0000)
Subject: (custom-save-all): Bind file-precious-flag to t for saving .emacs.
X-Git-Tag: ttn-vms-21-2-B4~16998
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=82d3d6946e36f62c3db92530f6ff8a71514af442;p=emacs.git

(custom-save-all): Bind file-precious-flag to t for saving .emacs.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9af455ffa26..d72c30116f7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 2002-01-24  Richard M. Stallman  <rms@gnu.org>
 
+	* cus-edit.el (custom-save-all): Bind file-precious-flag to t
+	for saving .emacs.
+
+	* files.el (basic-save-buffer-2): Ignore file-error in delete-file.
+
 	* calendar/calendar.el (generate-calendar-month): Doc fix.
 
 2002-01-23  Richard M. Stallman  <rms@gnu.org>
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 1d411f75bdf..3b1fcecd4b5 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -3742,7 +3742,8 @@ or (if there were none) at the end of the buffer."
     (save-excursion
       (let ((default-major-mode nil))
 	(set-buffer (find-file-noselect (custom-file))))
-      (save-buffer))))
+      (let ((file-precious-flag t))
+	(save-buffer)))))
 
 ;;; The Customize Menu.