Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-21 12:27:33 +00:00
Code Issues Projects Releases Packages Wiki Activity

Make gnus-summary-bookmark-make-record work for Emacs 23 as well.

Browse source 
2010-07-15  Katsumi Yamaoka  <yamaoka@jpl.org>
 * gnus-sum.el (gnus-summary-bookmark-make-record): Make it work for
 Emacs 23 as well.
This commit is contained in:
Katsumi Yamaoka 2010-07-15 00:54:06 +00:00
parent 077e075349
commit e859bbdae2
2 changed files with 14 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
lisp/gnus/ChangeLog
View file

@ -1,4 +1,9 @@
2010-07-13 Thierry Volpiatto <thierry.volpiatto@gmail.com>
2010-07-15 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-sum.el (gnus-summary-bookmark-make-record): Make it work for
Emacs 23 as well.
2010-07-13 Thierry Volpiatto <thierry.volpiatto@gmail.com>
Allow C-w when setting a bookmark in a Gnus Article buffer (Bug#5975).
Patch applied by Karl Fogel.
@ -15,14 +20,14 @@
* gnus-art.el (bookmark-make-record-function): New local variable.
* gnus-sum.el (gnus-summary-bookmark-make-record): Allow setting
from article buffer.
* gnus-sum.el (gnus-summary-bookmark-make-record): Allow setting from
article buffer.
(gnus-summary-bookmark-jump): Maybe jump to article buffer.
2010-07-13 Karl Fogel <kfogel@red-bean.com>
* gnus/gnus-sum.el (bookmark-make-record-default): Adjust
declaration, based on changes in bookmark.el.
* gnus-sum.el (bookmark-make-record-default): Adjust declaration, based
on changes in bookmark.el.
2010-06-22 Mark A. Hershberger <mah@everybody.org>

5
lisp/gnus/gnus-sum.el
View file

@ -12645,7 +12645,10 @@ If ALL is a number, fetch this number of articles."
(head (gnus-summary-article-header art))
(id (mail-header-id head)))
`(,subject
,@(bookmark-make-record-default 'no-file 'no-context pos)
,@(condition-case nil
(bookmark-make-record-default 'no-file 'no-context (point))
(wrong-number-of-arguments
(bookmark-make-record-default 'point-only)))
(location . ,(format "Gnus-%s %s:%d:%s" buf grp art id))
(group . ,grp) (article . ,art)
(message-id . ,id) (handler . gnus-summary-bookmark-jump)))))