[Emacs-diffs] emacs/lisp/erc ChangeLog erc-button.el

[Johan Bockgård]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Johan Bockgård <bojohan>        09/09/27 13:08:27

Modified files:
        lisp/erc       : ChangeLog erc-button.el 

Log message:
        (erc-button-keymap): Bind `follow-link'.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/erc/ChangeLog?cvsroot=emacs&r1=1.101&r2=1.102
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/erc/erc-button.el?cvsroot=emacs&r1=1.13&r2=1.14

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/erc/ChangeLog,v
retrieving revision 1.101
retrieving revision 1.102
diff -u -b -r1.101 -r1.102
--- ChangeLog   26 Sep 2009 14:16:33 -0000      1.101
+++ ChangeLog   27 Sep 2009 13:08:27 -0000      1.102
@@ -1,3 +1,7 @@
+2009-09-27  Johan Bockgård  <address@hidden>
+
+       * erc-button.el (erc-button-keymap): Bind `follow-link'.
+
 2009-09-26  Johan Bockgård  <address@hidden>
 
        * erc-button.el (erc-button-add-button): Only call

Index: erc-button.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/erc/erc-button.el,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- erc-button.el       26 Sep 2009 14:16:33 -0000      1.13
+++ erc-button.el       27 Sep 2009 13:08:27 -0000      1.14
@@ -216,6 +216,7 @@
       (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.")