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

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 390b3d680f1765013a5e588d2b91dd98e55e141e..be485c306d12676b487f19859e2b7b7be6d52d41 100644 (file)
--- 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 1186a5fb8b48d0a2b345632080323fb05720a502..d14bddc769f98fdfa9f66b7f5a59f4ae12710820 100644 (file)
--- 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