Fix mouse buttons in dired--make-directory-clickable

* lisp/dired.el (dired--make-directory-clickable): Adjust mouse
clicks to conform to our standards.

diff --git a/lisp/dired.el b/lisp/dired.el
index ced18114c4641899b2677339985a656f92c4e97e..40dfc39b9ad01448418cd4fde61bb8407541ce12 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1672,7 +1672,8 @@ see `dired-use-ls-dired' for more details.")
                                           (dired-goto-subdir current-dir)
                                         (dired current-dir)))))
                         (define-keymap
-                          [down-mouse-1] click
+                          [mouse-2] click
+                          [follow-link] 'mouse-face
                           ["RET"] click))))
           (setq segment-start (point)))))))