Subject: bug#78455: 30.0.92; Dired-Hide-Details mode doesn't work in `find-lisp-find-dired' buffers

From: Eli Zaretskii <[email-masked]>
Date: Sat, 17 May 2025 13:36:37 +0300

> From: Jake <[email-masked]>
> Date: Fri, 16 May 2025 13:44:28 +0000
> 
> M-x dired-hide-details-mode (bound to `(') has no effect in *Find Lisp Dired* buffers produced by M-x
> find-lisp-find-dired.

Thanks.  Does the patch below give good results?

diff --git a/lisp/find-lisp.el b/lisp/find-lisp.el
index 5f6b56e..ddfc7e9 100644
--- a/lisp/find-lisp.el
+++ b/lisp/find-lisp.el
@@ -304,14 +304,16 @@ find-lisp-find-dired-insert-file
 
 This function heeds `dired-actual-switches'."
   (set-buffer buffer)
-  (insert find-lisp-line-indent
-          (find-lisp-format
-           (propertize file 'dired-filename t)
-           (file-attributes file 'string)
-           (or (and dired-actual-switches
-                    (split-string-and-unquote dired-actual-switches))
-               (list ""))
-           nil)))
+  (let ((pt (point)))
+    (insert find-lisp-line-indent
+            (find-lisp-format
+             (propertize file 'dired-filename t)
+             (file-attributes file 'string)
+             (or (and dired-actual-switches
+                      (split-string-and-unquote dired-actual-switches))
+                 (list ""))
+             nil))
+    (dired-insert-set-properties pt (point))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Lifted from ls-lisp. We don't want to require it, because that