diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-08-11 20:36:30 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-08-11 20:36:30 +0000 |
| commit | 114b93e4ed00b35c6cb06c6c12281c98697440cd (patch) | |
| tree | 46c27f38df026c82da279f57251ee0dc824552df | |
| parent | 989766d79e6e4774c6974b388020d0a1ab1a0324 (diff) | |
| download | emacs-114b93e4ed00b35c6cb06c6c12281c98697440cd.tar.gz | |
(ask-user-about-supersession-threat): Mention file name when asking question.
| -rw-r--r-- | lisp/userlock.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/userlock.el b/lisp/userlock.el index b79859de614..316a1a4c892 100644 --- a/lisp/userlock.el +++ b/lisp/userlock.el @@ -94,7 +94,8 @@ The buffer in question is current when this function is called." (save-window-excursion (let (answer) (while (null answer) - (message "File has changed on disk; really want to edit the buffer? (y, n or C-h) ") + (message "%s changed on disk; really edit the buffer? (y, n or C-h) " + (file-name-nondirectory fn)) (let ((tem (downcase (let ((cursor-in-echo-area t)) (read-char))))) (setq answer |