# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 766290456 0
# Node ID 47bed999969a884ce88bb9a1dfda09066ac77ef9
# Parent  82b01d3bcead132f74fdb07e338daf4f79a965df
(find-buffer-visiting): Don't check buffer-file-number
unless buffer-file-name is non-nil.

diff -r 82b01d3bcead -r 47bed999969a lisp/files.el
--- a/lisp/files.el	Wed Apr 13 23:25:17 1994 +0000
+++ b/lisp/files.el	Thu Apr 14 02:27:36 1994 +0000
@@ -596,7 +596,8 @@
 	       (while (and (not found) list)
 		 (save-excursion
 		   (set-buffer (car list))
-		   (if (and (equal buffer-file-number number)
+		   (if (and buffer-file-name
+			    (equal buffer-file-number number)
 			    ;; Verify this buffer's file number
 			    ;; still belongs to its file.
 			    (file-exists-p buffer-file-name)