diff options
| -rw-r--r-- | lisp/ansi-osc.el | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/lisp/ansi-osc.el b/lisp/ansi-osc.el index 34154998cdf..499c9dce73a 100644 --- a/lisp/ansi-osc.el +++ b/lisp/ansi-osc.el @@ -125,13 +125,11 @@ and `shell-dirtrack-mode'." ;; Hyperlink handling (OSC 8) -(defvar ansi-osc-hyperlink-map - (let ((map (make-sparse-keymap))) - (define-key map "\C-c\r" 'browse-url-button-open) - (define-key map [mouse-2] 'browse-url-button-open) - (define-key map [follow-link] 'mouse-face) - map) - "Keymap used by OSC 8 hyperlink buttons.") +(defvar-keymap ansi-osc-hyperlink-map + :doc "Keymap used by OSC 8 hyperlink buttons." + "C-c RET" #'browse-url-button-open + "<mouse-2>" #'browse-url-button-open + "<follow-link>" 'mouse-face) (define-button-type 'ansi-osc-hyperlink 'keymap ansi-osc-hyperlink-map |