(mode-require-final-newline): Doc fix.

(backup-buffer-copy): Fix last change.

2 files changed, 8 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 390b3d680f1..be485c306d1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-04-24  Eli Zaretskii  <eliz@gnu.org>
+
+        * files.el (mode-require-final-newline): Doc fix.
+        (backup-buffer-copy): Fix last change.
+
 2005-04-24  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
 
         * term/mac-win.el: Require select.  Set selection-coding-system to
diff --git a/lisp/files.el b/lisp/files.el
index 1186a5fb8b4..d14bddc769f 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -302,7 +302,7 @@ A value of `visit-save' means do it at both of those times.
 Any other non-nil value means ask user whether to add a newline, when saving.
 nil means do not add newlines when saving.
 
-If you set this to nil, you must careful to manually add a final newline
+If you set this to nil, you be must careful to manually add a final newline
 whenever you save a file that really needs one."
   :type '(choice (const :tag "When visiting" visit)
                  (const :tag "When saving" t)
@@ -2766,7 +2766,8 @@ BACKUPNAME is the backup file name, which is the old file renamed."
             ;; the file was somehow created by someone else between
             ;; `make-temp-name' and `write-region', let's try again.
             nil)
-          (copy-file from-name to-name t t 'excl))
+;         (copy-file from-name to-name t t 'excl))
+          (copy-file from-name to-name t t))
       ;; Reset the umask.
       (set-default-file-modes umask)))
   (and modes