[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master f8ac290945 1/2: * lisp/find-dired.el (find-dired): Make directory
From: |
Lars Ingebrigtsen |
Subject: |
master f8ac290945 1/2: * lisp/find-dired.el (find-dired): Make directory clickable. |
Date: |
Mon, 13 Jun 2022 08:20:37 -0400 (EDT) |
branch: master
commit f8ac290945102f2b59a4474bd4c53ba22db6a076
Author: Visuwesh <visuweshm@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
* lisp/find-dired.el (find-dired): Make directory clickable.
* lisp/find-dired.el (find-dired): Make the directory line
clickable (bug#55906).
---
lisp/find-dired.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/lisp/find-dired.el b/lisp/find-dired.el
index c04545e44e..8c1e684b7e 100644
--- a/lisp/find-dired.el
+++ b/lisp/find-dired.el
@@ -241,6 +241,8 @@ it finishes, type \\[kill-find]."
;; Subdir headlerline must come first because the first marker in
;; subdir-alist points there.
(insert " " dir ":\n")
+ (when dired-make-directory-clickable
+ (dired--make-directory-clickable))
;; Make second line a ``find'' line in analogy to the ``total'' or
;; ``wildcard'' line.
(let ((point (point)))