From: Juri Linkov <juri@linkov.net>
Date: Tue, 20 Jul 2021 19:53:06 +0000 (+0300)
Subject: * lisp/button.el (button-map): Bind [follow-link] to 'mouse-face' (bug#49626)
X-Git-Tag: emacs-28.0.90~1778
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1b251ed4e8550c889d17fe7d88f58aa2fbc95fe0;p=emacs.git

* lisp/button.el (button-map): Bind [follow-link] to 'mouse-face' (bug#49626)
---

diff --git a/lisp/button.el b/lisp/button.el
index 69d70540c06..74dfb5d5419 100644
--- a/lisp/button.el
+++ b/lisp/button.el
@@ -61,6 +61,7 @@
     ;; might get converted to ^M when building loaddefs.el
     (define-key map [(control ?m)] 'push-button)
     (define-key map [mouse-2] 'push-button)
+    (define-key map [follow-link] 'mouse-face)
     ;; FIXME: You'd think that for keymaps coming from text-properties on the
     ;; mode-line or header-line, the `mode-line' or `header-line' prefix
     ;; shouldn't be necessary!