Mercurial > emacs
comparison lisp/files.el @ 2553:61e4e09e7243
(find-file-noselect): Never set SAME-TRUENAME to a buffer whose
buffer-file-name is nil.
| author | Roland McGrath <roland@gnu.org> |
|---|---|
| date | Mon, 19 Apr 1993 20:36:23 +0000 |
| parents | ce9a2a209b97 |
| children | 1c5dca7628cb |
comparison
equal
deleted
inserted
replaced
| 2552:ce9a2a209b97 | 2553:61e4e09e7243 |
|---|---|
| 466 (let (found | 466 (let (found |
| 467 (list (buffer-list))) | 467 (list (buffer-list))) |
| 468 (while (and (not found) list) | 468 (while (and (not found) list) |
| 469 (save-excursion | 469 (save-excursion |
| 470 (set-buffer (car list)) | 470 (set-buffer (car list)) |
| 471 (if (string= buffer-file-truename truename) | 471 (if (and buffer-file-name |
| 472 (string= buffer-file-truename truename)) | |
| 472 (setq found (car list)))) | 473 (setq found (car list)))) |
| 473 (setq list (cdr list))) | 474 (setq list (cdr list))) |
| 474 found))) | 475 found))) |
| 475 (same-number | 476 (same-number |
| 476 (or buf ; Shortcut | 477 (or buf ; Shortcut |