diff options
author | JSDurand <mmemmew@gmail.com> | 2021-09-15 17:09:52 +0800 |
---|---|---|
committer | JSDurand <mmemmew@gmail.com> | 2021-09-15 17:09:52 +0800 |
commit | d81469b7d7fd979236badafbdf0b04c6c876e3f1 (patch) | |
tree | 4c7579d8d863b57003cafad4264beeef9b37f4c3 /bookmark-conf.el | |
parent | 5ef7af33cf1bd9c7c8f3537dd288fcc60e349e86 (diff) |
EWW: integrate with the built-in bookmark framework
* bookmark-conf.el (blist-eww-p): Group EWW bookmarks together.
* eww-conf.el (durand-eww-bookmark-make-record)
(durand-eww-set-bookmark-record-function, eww-mode-hook): Make records
for EWW buffers.
(durand-eww-bookmark-jump): Jump to EWW bookmarks.
Diffstat (limited to 'bookmark-conf.el')
-rw-r--r-- | bookmark-conf.el | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/bookmark-conf.el b/bookmark-conf.el index a8244e5..fc95cb8 100644 --- a/bookmark-conf.el +++ b/bookmark-conf.el @@ -50,6 +50,7 @@ blist-filter-groups (list (cons "Eshell" #'blist-eshell-p) + (cons "EWW" #'blist-eww-p) (cons "Gnus" #'blist-gnus-p) (cons "PDF" #'blist-pdf-p) (cons "ELisp" #'blist-elisp-p) @@ -64,9 +65,15 @@ ;; There seems to be only two GNUS bookmark handlers (or one?) (blist-define-criterion "gnus" "Gnus" - (let ((handler (bookmark-get-handler bookmark))) - (memq handler (list #'gnus-summary-bookmark-jump - #'gnus-bookmark-jump)))) + (memq (bookmark-get-handler bookmark) + (list #'gnus-summary-bookmark-jump + #'gnus-bookmark-jump))) + +;;;; EWW group + +(blist-define-criterion "eww" "EWW" + (eq (bookmark-get-handler bookmark) + #'durand-eww-bookmark-jump)) ;;;; Info group |