master 06b7c53927: Add more bookmark types

[Lars Ingebrigtsen]

branch: master
commit 06b7c53927b983764a7174b7edbb51832b21fbc8
Author: Matthias Meulien <orontee@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Add more bookmark types
    
    * lisp/gnus/gnus-sum.el (gnus-summary-bookmark-jump):
    * lisp/man.el (Man-bookmark-jump): Mark the bookmark type
    (bug#54030).
---
 lisp/gnus/gnus-sum.el | 2 ++
 lisp/man.el           | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 8fb07d5905..1be5a48068 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -13278,6 +13278,8 @@ BOOKMARK is a bookmark name or a bookmark record."
        (buffer . ,(current-buffer))
        . ,(bookmark-get-bookmark-record bookmark)))))
 
+(put 'gnus-summary-bookmark-jump 'bookmark-handler-type "Gnus")
+
 (gnus-summary-make-all-marking-commands)
 
 (provide 'gnus-sum)
diff --git a/lisp/man.el b/lisp/man.el
index a53a696c31..951e0ef9ad 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -1976,6 +1976,8 @@ Uses `Man-name-local-regexp'."
     (bookmark-default-handler
      `("" (buffer . ,buf) . ,(bookmark-get-bookmark-record bookmark)))))
 
+(put 'Man-bookmark-jump 'bookmark-handler-type "Man")
+
 ;;; Mouse support
 (defun Man-at-mouse (e)
   "Open man manual at point."