Mercurial > emacs

diff lisp/gnus/gnus-sum.el @ 107855:d9895f87d758

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add a new field `location' to bookmarks for non-file bookmarks. * bookmark.el (bookmark-location): Use the new field, if present. (bookmark-insert-location): Undo last change, not needed any more. * man.el (Man-bookmark-make-record): * woman.el (woman-bookmark-make-record): * gnus-sum.el (gnus-summary-bookmark-make-record): Add `location' field.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 14 Apr 2010 11:07:53 -0400
parents f50f5478ec53
children 8264830363ca
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el	Wed Apr 14 03:43:54 2010 +0300
+++ b/lisp/gnus/gnus-sum.el	Wed Apr 14 11:07:53 2010 -0400
@@ -12657,8 +12657,9 @@
          (id      (mail-header-id head)))
     `(,subject
       ,@(bookmark-make-record-default 'point-only)
-        (group . ,grp) (article . ,art)
-        (message-id . ,id) (handler . gnus-summary-bookmark-jump))))
+      (location . ,(format "Gnus %s:%d:%s" grp art id))
+      (group . ,grp) (article . ,art)
+      (message-id . ,id) (handler . gnus-summary-bookmark-jump))))
 
 ;;;###autoload
 (defun gnus-summary-bookmark-jump (bookmark)