emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master dee0ed5 3/5: Remove XEmacs support from goto-addr.e


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] master dee0ed5 3/5: Remove XEmacs support from goto-addr.el
Date: Wed, 12 Jun 2019 17:27:08 -0400 (EDT)

branch: master
commit dee0ed52c093818d14e6e6281199a1d55a012309
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Remove XEmacs support from goto-addr.el
    
    * lisp/net/goto-addr.el (goto-address-highlight-keymap): Remove
    XEmacs support.
---
 lisp/net/goto-addr.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/net/goto-addr.el b/lisp/net/goto-addr.el
index c25d787..af2b836 100644
--- a/lisp/net/goto-addr.el
+++ b/lisp/net/goto-addr.el
@@ -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.")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]