procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

gnus-msg.el: Add nnir-article-* autoloads;

Browse source 
nnir.el: Improve mark updating in original groups
This commit is contained in:
Andrew Cohen 2013-04-01 22:54:32 +00:00 • committed by Katsumi Yamaoka
parent 15c579f08c
commit 54451ffafa
3 changed files with 17 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/gnus/ChangeLog
View file

@ -1,3 +1,11 @@
2013-04-01 Andrew Cohen <cohen@bu.edu>
* nnir.el (nnir-request-update-mark): Improve mark updating in original
group.
* gnus-msg.el (nnir-article-number, nnir-article-group): Autoload to
fix compilation.
2013-03-31 Andrew Cohen <cohen@bu.edu>
* nnir.el (nnir-method-default-engines): And another typo.

4
lisp/gnus/gnus-msg.el
View file

@ -415,6 +415,10 @@ Thank you for your help in stamping out bugs.
(gnus-inews-make-draft-meta-information
,(gnus-group-decoded-name gnus-newsgroup-name) ',articles)))
(autoload 'nnir-article-number "nnir" nil nil 'macro)
(autoload 'nnir-article-group "nnir" nil nil 'marcro)
(defvar gnus-article-reply nil)
(defmacro gnus-setup-message (config &rest forms)
(let ((winconf (make-symbol "gnus-setup-message-winconf"))

5
lisp/gnus/nnir.el
View file

@ -841,6 +841,11 @@ skips all prompting."
(gnus-summary-read-group-1 backend-article-group t t nil
nil (list backend-article-number))))
(deffoo nnir-request-update-mark (group article mark)
(let ((artgroup (nnir-article-group article))
(artnumber (nnir-article-number article)))
(gnus-request-update-mark artgroup artnumber mark)))
(deffoo nnir-request-update-info (group info &optional server)
(let ((articles-by-group