diff options
author | Visuwesh <visuweshm@gmail.com> | 2022-06-12 12:35:08 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-06-13 12:29:17 +0200 |
commit | f8ac290945102f2b59a4474bd4c53ba22db6a076 (patch) | |
tree | fe2d56f155d977e138cf536a56f3fc73f45989db | |
parent | a1a435b3f6c7afa910da2256334471ba49010974 (diff) | |
download | emacs-f8ac290945102f2b59a4474bd4c53ba22db6a076.tar.gz |
* lisp/find-dired.el (find-dired): Make directory clickable.
* lisp/find-dired.el (find-dired): Make the directory line
clickable (bug#55906).
-rw-r--r-- | lisp/find-dired.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/find-dired.el b/lisp/find-dired.el index c04545e44e9..8c1e684b7ea 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))) |