* lisp/net/rcirc.el: Add follow-link binding (Bug#4738).

2 files changed, 5 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eb35ed93afc..20a6e5e2bdf 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-01-02  Ryan Yeske  <rcyeske@gmail.com>
+
+        * net/rcirc.el: Add follow-link binding (Bug#4738).
+
 2010-01-02  Eli Zaretskii  <eliz@gnu.org>
 
         * Makefile.in (bzr-update): Renamed from cvs-update.
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index d1f54c9909d..e4aaef94983 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -836,6 +836,7 @@ If SILENT is non-nil, do not print the message in any irc buffer."
 
 (define-key rcirc-browse-url-map (kbd "RET") 'rcirc-browse-url-at-point)
 (define-key rcirc-browse-url-map (kbd "<mouse-2>") 'rcirc-browse-url-at-mouse)
+(define-key rcirc-browse-url-map [follow-link] 'mouse-face)
 
 (defvar rcirc-short-buffer-name nil
   "Generated abbreviation to use to indicate buffer activity.")