diff options
| author | Richard M. Stallman | 1994-04-14 02:27:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-04-14 02:27:36 +0000 |
| commit | d49ab5a0e7d0052023d7fae17ff124edc4bb5eac (patch) | |
| tree | f5c581f11a1b879984d2014bdb54cd134657d5aa | |
| parent | cda2316f6b6c14573aeb0b1a4f82985df1ecfcd1 (diff) | |
| download | emacs-d49ab5a0e7d0052023d7fae17ff124edc4bb5eac.tar.gz emacs-d49ab5a0e7d0052023d7fae17ff124edc4bb5eac.zip | |
(find-buffer-visiting): Don't check buffer-file-number
unless buffer-file-name is non-nil.
| -rw-r--r-- | lisp/files.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 2b3590176f3..f36dc409e46 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -596,7 +596,8 @@ If there is no such live buffer, return nil." | |||
| 596 | (while (and (not found) list) | 596 | (while (and (not found) list) |
| 597 | (save-excursion | 597 | (save-excursion |
| 598 | (set-buffer (car list)) | 598 | (set-buffer (car list)) |
| 599 | (if (and (equal buffer-file-number number) | 599 | (if (and buffer-file-name |
| 600 | (equal buffer-file-number number) | ||
| 600 | ;; Verify this buffer's file number | 601 | ;; Verify this buffer's file number |
| 601 | ;; still belongs to its file. | 602 | ;; still belongs to its file. |
| 602 | (file-exists-p buffer-file-name) | 603 | (file-exists-p buffer-file-name) |