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 | a217e08acfacc3cb325ce2ec0aea7d85b58ede50 (patch) | |
| tree | 546eecc22e4366961fe9f024cc4cd60c1d1aa137 /lisp/userlock.el | |
| parent | a1251f7964c1ee06b2668b91beeb423e1471f341 (diff) | |
| download | emacs-a217e08acfacc3cb325ce2ec0aea7d85b58ede50.tar.gz | |
(ask-user-about-supersession-threat): Mention file name when asking question.
Diffstat (limited to 'lisp/userlock.el')
| -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 |