From: Eli Zaretskii Date: Sat, 30 Dec 2023 11:04:58 +0000 (+0200) Subject: ; * lisp/files.el (find-buffer-visiting): Fix whitespace of last change. X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06f2bb9c24104b87b458506f3bdee1aaba7bbf97;p=emacs.git ; * lisp/files.el (find-buffer-visiting): Fix whitespace of last change. --- diff --git a/lisp/files.el b/lisp/files.el index 78e2bca3cff..006163823ae 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2221,14 +2221,16 @@ If there is no such live buffer, return nil." (and buffer-file-numbers-unique (car-safe number) ;Make sure the inode is not just nil. (let* ((buf (find-buffer 'buffer-file-number number)) - (buf-file-name (and buf (buffer-local-value 'buffer-file-name buf)))) + (buf-file-name + (and buf (buffer-local-value 'buffer-file-name buf)))) (when (and buf-file-name ;; Verify this buffer's file number ;; still belongs to its file. (file-exists-p buf-file-name) - (equal - (file-attributes (buffer-local-value 'buffer-file-truename buf)) - attributes) + (equal (file-attributes + (buffer-local-value + 'buffer-file-truename buf)) + attributes) (or (not predicate) (funcall predicate buf))) buf))))))))