# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 944752831 0
# Node ID 2a78c861578f2324f1545ee8e14a626cfb5c3a86
# Parent  6dc236826c618d2ab4a674a183da2b8c24d1f983
(after-find-file): Use auto-save-visited-file-name if set.

diff -r 6dc236826c61 -r 2a78c861578f lisp/files.el
--- a/lisp/files.el	Thu Dec 09 15:15:54 1999 +0000
+++ b/lisp/files.el	Thu Dec 09 15:20:31 1999 +0000
@@ -1195,7 +1195,8 @@
 		   "File exists, but cannot be read")
 		  ((not buffer-read-only)
 		   (if (and warn
-			    (file-newer-than-file-p (make-auto-save-file-name)
+			    (file-newer-than-file-p (or auto-save-visited-file-name
+							(make-auto-save-file-name))
 						    buffer-file-name))
 		       (format "%s has auto save data; consider M-x recover-file"
 			       (file-name-nondirectory buffer-file-name))