[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: incorrect error message when reverting unreadable file
From: |
Richard Stallman |
Subject: |
Re: incorrect error message when reverting unreadable file |
Date: |
Wed, 22 Nov 2006 08:16:17 -0500 |
Does this change give good behavior?
*** files.el 13 Nov 2006 15:19:14 -0500 1.865
--- files.el 21 Nov 2006 21:30:29 -0500
***************
*** 4081,4086 ****
--- 4081,4091 ----
"File %s no longer exists!"
"Cannot revert nonexistent file %s")
file-name))
+ ((not (file-readable-p file-name))
+ (error (if buffer-file-number
+ "File %s no longer readable!"
+ "Cannot revert unreadable file %s")
+ file-name))
(t
;; Bind buffer-file-name to nil
;; so that we don't try to lock the file.