Re: incorrect error message when reverting unreadable file

[Chris Moore]

On 11/22/06, Richard Stallman <address@hidden> wrote:

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.

Yes, it does.