]> git.eshelyaron.com Git - emacs.git/commitdiff
Remove XEmacs support from goto-addr.el
authorLars Ingebrigtsen <larsi@gnus.org>
Wed, 12 Jun 2019 21:15:18 +0000 (23:15 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Wed, 12 Jun 2019 21:26:56 +0000 (23:26 +0200)
* lisp/net/goto-addr.el (goto-address-highlight-keymap): Remove
XEmacs support.

lisp/net/goto-addr.el

index c25d78739181bfdbe9662effe599a159438d18e9..af2b83653dd5ea83de6ed12864a02bf31c6bb9ab 100644 (file)
@@ -122,8 +122,7 @@ A value of t means there is no limit--fontify regardless of the size."
 
 (defvar goto-address-highlight-keymap
   (let ((m (make-sparse-keymap)))
-    (define-key m (if (featurep 'xemacs) (kbd "<button2>") (kbd "<mouse-2>"))
-      'goto-address-at-point)
+    (define-key m (kbd "<mouse-2>") 'goto-address-at-point)
     (define-key m (kbd "C-c RET") 'goto-address-at-point)
     m)
   "Keymap to hold goto-addr's mouse key defs under highlighted URLs.")