diff options
| author | Richard M. Stallman | 1993-08-06 18:03:10 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-08-06 18:03:10 +0000 |
| commit | ff78d52034c2be43b14579dbe6df5b3a40c2b1f9 (patch) | |
| tree | 329eb9e6bc14297d79edbdb579fcf8eb708d812e | |
| parent | 88a2603af6cd29566444a22cee7bcbd22a13ef47 (diff) | |
| download | emacs-ff78d52034c2be43b14579dbe6df5b3a40c2b1f9.tar.gz emacs-ff78d52034c2be43b14579dbe6df5b3a40c2b1f9.zip | |
(after-find-file): Improve warning message about
existing file that can't be read.
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index fbf75041726..6c35a19f522 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -694,7 +694,7 @@ Finishes by calling the functions in `find-file-hooks'." | |||
| 694 | (msg | 694 | (msg |
| 695 | (cond ((and error (file-attributes buffer-file-name)) | 695 | (cond ((and error (file-attributes buffer-file-name)) |
| 696 | (setq buffer-read-only t) | 696 | (setq buffer-read-only t) |
| 697 | "File exists, but is read-protected.") | 697 | "File exists, but cannot be read.") |
| 698 | ((not buffer-read-only) | 698 | ((not buffer-read-only) |
| 699 | (if (and warn | 699 | (if (and warn |
| 700 | (file-newer-than-file-p (make-auto-save-file-name) | 700 | (file-newer-than-file-p (make-auto-save-file-name) |