[elpa] externals/dired-preview 60aaa24d8c 1/7: Simplify dired-preview--get-buffers

[ELPA Syncer]

branch: externals/dired-preview
commit 60aaa24d8c5242e1c33123146399692a58485c8f
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Simplify dired-preview--get-buffers
    
    Thanks to Philip Kaludercic and Stefan Monnier for pointing this out
    on the emacs-devel mailing list:
    <https://lists.gnu.org/archive/html/emacs-devel/2023-07/msg00436.html>.
---
 README.org       | 2 +-
 dired-preview.el | 7 +------
 2 files changed, 2 insertions(+), 7 deletions(-)

diff --git a/README.org b/README.org
index ad6cd836a7..c2eb86c2f2 100644
--- a/README.org
+++ b/README.org
@@ -221,7 +221,7 @@ matters.
 + Author/maintainer :: Protesilaos Stavrou.
 
 + Contributions to code or the manual :: Bruno Boal, Christian Tietze,
-  Karthik Chikmagalur.
+  Karthik Chikmagalur, Stefan Monnier, Philip Kaludercic.
 
 + Ideas and/or user feedback :: Bruno Boal, Ed Hamilton, Karthik
   Chikmagalur, Peter Prevos.
diff --git a/dired-preview.el b/dired-preview.el
index 853131bcd0..43a7cec532 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -97,12 +97,7 @@ details."
 
 (defun dired-preview--get-buffers ()
   "Return buffers that show previews."
-  (seq-filter
-   (lambda (buffer)
-     (when (and (bufferp buffer)
-                (buffer-live-p buffer))
-       buffer))
-   dired-preview--buffers))
+  (seq-filter #'buffer-live-p dired-preview--buffers))
 
 (defun dired-preview--window-parameter-p (window)
   "Return non-nil if WINDOW has `dired-preview-window' parameter."