(Fwrite_region): Don't change START and END from nil

[gnu-emacs] / lisp / userlock.el

diff --git a/lisp/userlock.el b/lisp/userlock.el
index cce5251204ba516c1c05c0eb5dd224b3c08291f9..316a1a4c892312ed0038d4d78e1c9acf38ef3a66 100644 (file)
--- a/lisp/userlock.el
+++ b/lisp/userlock.el
@@ -1,10 +1,10 @@
 ;;; userlock.el --- handle file access contention between multiple users
 
-;;; Maintainer: FSF
-;;; Last-Modified: 26 May 1987
-
 ;; Copyright (C) 1985, 1986 Free Software Foundation, inc.
 
+;; Maintainer: FSF
+;; Keywords: internal
+
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
@@ -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