diff options
| author | jao <jao@gnu.org> | 2022-01-27 19:04:16 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-01-27 19:05:15 +0000 |
| commit | 0b8f339d25300909b77b15945b309f5931253120 (patch) | |
| tree | 5d947f4f1beb873824e8896db9edb292ea5d97f4 /attic | |
| parent | 317f90a036c996bce5bed5cb15f606e8fd8f8a09 (diff) | |
| download | elibs-0b8f339d25300909b77b15945b309f5931253120.tar.gz elibs-0b8f339d25300909b77b15945b309f5931253120.tar.bz2 | |
clean-ups for avy/link-hint
Diffstat (limited to 'attic')
| -rw-r--r-- | attic/misc.org | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/attic/misc.org b/attic/misc.org index b9fdbfb..11f6162 100644 --- a/attic/misc.org +++ b/attic/misc.org @@ -1014,3 +1014,22 @@ ;; pdf-view-next-line-or-next-page)) ;; (advice-add f :after #'jao--refresh)) #+end_src +* link-hint for w3m + #+begin_src emacs-lisp + (defun jao-link-hint--notmuch-next-url (&optional bound) + (link-hint--next-property 'w3m-href-anchor bound)) + + (defun jao-link-hint--notmuch-url-at-point () + (get-text-property (point) 'w3m-href-anchor)) + + (link-hint-define-type 'notmuch-w3m-url + :next #'jao-link-hint--notmuch-next-url + :at-point-p #'jao-link-hint--notmuch-url-at-point + :vars '(notmuch-show-mode) + :open #'browse-url + :open-multiple t + :copy #'kill-new) + + (push 'link-hint-notmuch-w3m-url link-hint-types) + + #+end_src |