aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1993-04-11 21:22:35 +0000
committerRichard M. Stallman1993-04-11 21:22:35 +0000
commit4e7afa864d1a35383219953d25b6fdc78f567324 (patch)
tree029c49c29f5cae15914ea4b8e5e2252740c1ab01
parente407986c5686d2bcba89bfb4c4057cc01b4354d4 (diff)
downloademacs-4e7afa864d1a35383219953d25b6fdc78f567324.tar.gz
emacs-4e7afa864d1a35383219953d25b6fdc78f567324.zip
(find-file-noselect): Verify other buffers' file numbers are still valid.
-rw-r--r--lisp/files.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el
index fe3a29cfdd1..5d1b91ce823 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -480,7 +480,11 @@ The buffer is not selected, just returned to the caller."
480 (while (and (not found) list) 480 (while (and (not found) list)
481 (save-excursion 481 (save-excursion
482 (set-buffer (car list)) 482 (set-buffer (car list))
483 (if (equal buffer-file-number number) 483 (if (and (equal buffer-file-number number)
484 ;; Verify this buffer's file number
485 ;; still belongs to its file.
486 (file-exists-p buffer-file-name)
487 (equal (nthcdr 10 (file-attributes buffer-file-name)) number))
484 (setq found (car list)))) 488 (setq found (car list))))
485 (setq list (cdr list))) 489 (setq list (cdr list)))
486 found)))) 490 found))))