/[emacs]/emacs/lisp/net/goto-addr.el
ViewVC logotype

Diff of /emacs/lisp/net/goto-addr.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.20 by monnier, Fri May 6 21:24:09 2005 UTC revision 1.21 by monnier, Fri May 6 21:24:32 2005 UTC
# Line 119  A value of t means there is no limit--fo Line 119  A value of t means there is no limit--fo
119  (defvar goto-address-highlight-keymap  (defvar goto-address-highlight-keymap
120    (let ((m (make-sparse-keymap)))    (let ((m (make-sparse-keymap)))
121      (define-key m (if (featurep 'xemacs) (kbd "<button2>") (kbd "<mouse-2>"))      (define-key m (if (featurep 'xemacs) (kbd "<button2>") (kbd "<mouse-2>"))
122        'goto-address-at-point))        'goto-address-at-point)
123      (define-key m (kbd "C-c RET") 'goto-address-at-point)      (define-key m (kbd "C-c RET") 'goto-address-at-point)
124      m)      m)
125    "keymap to hold goto-addr's mouse key defs under highlighted URLs.")    "keymap to hold goto-addr's mouse key defs under highlighted URLs.")

Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26