mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(revert-buffer): Different error message for reverting a nonexistent file.

Browse source
This commit is contained in:
Richard M. Stallman 2003-02-23 15:04:11 +00:00
parent a1a052dfa5
commit e3bfcda9ac
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/files.el
View file

@ -3362,7 +3362,10 @@ non-nil, it is called instead of rereading visited file contents."
(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))
(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))