[elpa] externals/dired-preview d461945762 8/8: Move dired-preview--window-parameter-p closer to where it is used

[ELPA Syncer]

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

    Move dired-preview--window-parameter-p closer to where it is used
---
 dired-preview.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index c6b86ceaed..e47b6f2611 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -134,10 +134,6 @@ details."
   "Return buffers that show previews."
   (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."
-  (window-parameter window 'dired-preview-window))
-
 ;; TODO 2023-07-07: This can become a user option, but let's keep it
 ;; simple for now.  We need to be sure this is always doing the right
 ;; thing.
@@ -190,6 +186,10 @@ until it drops below this number.")
                           t)))
                     (dired-preview--get-buffers))))
 
+(defun dired-preview--window-parameter-p (window)
+  "Return non-nil if WINDOW has `dired-preview-window' parameter."
+  (window-parameter window 'dired-preview-window))
+
 (defun dired-preview--get-windows ()
   "Return windows that show previews."
   (seq-filter #'dired-preview--window-parameter-p (window-list)))