From 081bd373bab88e4c8686ac88dbc12acf0a6e828b Mon Sep 17 00:00:00 2001
From: =?utf8?q?Johan=20Bockg=C3=A5rd?= <bojohan@gnu.org>
Date: Sun, 27 Sep 2009 13:08:27 +0000
Subject: [PATCH] (erc-button-keymap): Bind `follow-link'.

---
 lisp/erc/ChangeLog     | 4 ++++
 lisp/erc/erc-button.el | 1 +
 2 files changed, 5 insertions(+)

diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog
index c2e83911e0c..73b14f6f912 100644
--- a/lisp/erc/ChangeLog
+++ b/lisp/erc/ChangeLog
@@ -1,3 +1,7 @@
+2009-09-27  Johan Bockgård  <bojohan@gnu.org>
+
+	* erc-button.el (erc-button-keymap): Bind `follow-link'.
+
 2009-09-26  Johan Bockgård  <bojohan@gnu.org>
 
 	* erc-button.el (erc-button-add-button): Only call
diff --git a/lisp/erc/erc-button.el b/lisp/erc/erc-button.el
index 8eee1ce278f..a862e02f43b 100644
--- a/lisp/erc/erc-button.el
+++ b/lisp/erc/erc-button.el
@@ -216,6 +216,7 @@ PAR is a number of a regexp grouping whose text will be passed to
       (define-key map (kbd "<mouse-2>") 'erc-button-click-button))
     (define-key map (kbd "TAB") 'erc-button-next)
     (define-key map (kbd "<backtab>") 'erc-button-previous)
+    (define-key map [follow-link] 'mouse-face)
     (set-keymap-parent map erc-mode-map)
     map)
   "Local keymap for ERC buttons.")
-- 
2.11.4.GIT