Use embark-dwim instead of goto-addr
This commit is contained in:
parent
2c6c7f9170
commit
5412a8c482
50
README.org
50
README.org
@ -878,10 +878,16 @@ Listing [[lst:configure-orderless]] configures [[info:orderless#Company][orderle
|
||||
:CUSTOM_ID: sec:embark-configuration
|
||||
:END:
|
||||
|
||||
Listing [[lst:configure-embark]] configures =embark= key bindings: type for instance
|
||||
{{{kbd(C-x C-h)}}} or {{{kbd(C-c C-h)}}} that the initialization
|
||||
src_emacs-lisp{(setq prefix-help-command #'embark-prefix-help-command)} enables
|
||||
minibuffer help after a prefix key.
|
||||
Listing [[lst:configure-embark]] configures =embark= key bindings:
|
||||
1. Except for highlighting of email and web URLs, =embark-dwim= englobes the
|
||||
functionality of src_emacs-lisp{(find-library "goto-addr")} that activates
|
||||
mail and web URLs to turn them into clickable buttons. Since =embark-dwim=
|
||||
acts on a superset of target types, it renders =goto-addr= superfluous. See:
|
||||
1. [[info:emacs#Goto Address mode][Goto Address mode (info)]].
|
||||
2. [[info:embark#The default action on a target][The default (embark-dwim) action on a target (info)]].
|
||||
2. The initialization src_emacs-lisp{(setq prefix-help-command
|
||||
#'embark-prefix-help-command)} enables minibuffer help after a prefix key as
|
||||
typing {{{kbd(C-x C-h)}}} or {{{kbd(C-c C-h)}}} shows.
|
||||
|
||||
#+caption[Configure =embark=]:
|
||||
#+caption: Configure =embark=.
|
||||
@ -3445,42 +3451,6 @@ Listing [[lst:configure-browse-url]] configures =browse-url=.
|
||||
(add-hook 'eww-after-render-hook #'eww-rename-buffer))
|
||||
#+end_src
|
||||
|
||||
*** [[info:emacs#Goto Address mode][Goto address mode (info)]]
|
||||
:PROPERTIES:
|
||||
:CUSTOM_ID: sec:goto-address-mode
|
||||
:END:
|
||||
|
||||
Listing [[lst:configure-goto-address-mode]]:
|
||||
1. Enables =goto-address-prog-mode= for programming modes and
|
||||
=goto-address-mode= for a selection of other modes.
|
||||
2. Defines a function to toggle =goto-address-prog-mode= for programming modes
|
||||
and =goto-address-mode= for other modes.
|
||||
3. Binds {{{kbd(C-c C-o)}}} to =goto-address-at-point= in
|
||||
=goto-address-highlight-keymap=.
|
||||
|
||||
#+caption[Configure =goto-address-mode=]:
|
||||
#+caption: Configure =goto-address-mode=.
|
||||
#+name: lst:configure-goto-address-mode
|
||||
#+begin_src emacs-lisp
|
||||
(when (cl-every #'fboundp '(goto-address-mode goto-address-prog-mode))
|
||||
(defun toggle-goto-address-dwim-mode ()
|
||||
"Toggle `goto-address-mode' or `goto-address-prog-mode' smartly.
|
||||
In case of `prog-mode', toggle the latter, else the former."
|
||||
(interactive)
|
||||
(if (derived-mode-p 'prog-mode)
|
||||
(call-interactively #'goto-address-prog-mode)
|
||||
(call-interactively #'goto-address-mode)))
|
||||
|
||||
(dolist (hook '(eshell-mode-hook shell-mode-hook org-mode-hook))
|
||||
(add-hook hook #'goto-address-mode))
|
||||
|
||||
(add-hook 'prog-mode-hook #'goto-address-prog-mode)
|
||||
|
||||
(with-eval-after-load 'goto-addr
|
||||
(define-key goto-address-highlight-keymap
|
||||
(kbd "C-c C-o") #'goto-address-at-point)))
|
||||
#+end_src
|
||||
|
||||
*** [[https://en.wikipedia.org/wiki/Media_type#Mailcap][Mailcap]]
|
||||
:PROPERTIES:
|
||||
:CUSTOM_ID: sec:mailcap
|
||||
|
Loading…
Reference in New Issue
Block a user