[Emacs-diffs] Changes to emacs/lisp/files.el

[Richard M. Stallman]

Index: emacs/lisp/files.el
diff -c emacs/lisp/files.el:1.639 emacs/lisp/files.el:1.640
*** emacs/lisp/files.el:1.639   Sat Feb 22 15:27:51 2003
--- emacs/lisp/files.el Sun Feb 23 10:04:11 2003
***************
*** 3362,3368 ****
                     (funcall revert-buffer-insert-file-contents-function
                              file-name auto-save-p)
                   (if (not (file-exists-p file-name))
!                      (error "File %s no longer exists!" file-name))
                   ;; Bind buffer-file-name to nil
                   ;; so that we don't try to lock the file.
                   (let ((buffer-file-name nil))
--- 3362,3371 ----
                     (funcall revert-buffer-insert-file-contents-function
                              file-name auto-save-p)
                   (if (not (file-exists-p file-name))
!                      (error (if buffer-file-number
!                                 "File %s no longer exists!"
!                               "Cannot revert nonexistent file %s")
!                             file-name))
                   ;; Bind buffer-file-name to nil
                   ;; so that we don't try to lock the file.
                   (let ((buffer-file-name nil))