diff options
author | Gnus developers <ding@gnus.org> | 2010-10-14 22:39:54 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-10-14 22:39:54 +0000 |
commit | 030158f32daaefe34476bbd0ec7156b46c2f3f2a (patch) | |
tree | dcb65508d10559d8a27f931b50b3dcb22d88a0a7 /lisp/gnus/gnus-int.el | |
parent | 7a9fc593508250c2a84320a5430dda49e7354fef (diff) | |
download | emacs-030158f32daaefe34476bbd0ec7156b46c2f3f2a.tar.gz |
Merge changes made in Gnus trunk.
shr.el: Fix defcustom type (char -> character).
nnimap.el (nnimap-open-connection): Remove %s from openssl incantation, which is no longer valid.
gnus-sum.el (gnus-summary-refer-thread): Implement a version that uses *-request-thread.
gnus-int.el (gnus-request-thread): New back end function.
nnimap.el (nnimap-request-thread): New back end function.
shr.el: Indent.
gnus-art.el, shr.el: Have shr switch buffer truncation on if there are big tables.
(nnimap-open-connection): Message when opening connection for debugging purposes.
Diffstat (limited to 'lisp/gnus/gnus-int.el')
-rw-r--r-- | lisp/gnus/gnus-int.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/gnus/gnus-int.el b/lisp/gnus/gnus-int.el index b210df452ca..19bcffe0049 100644 --- a/lisp/gnus/gnus-int.el +++ b/lisp/gnus/gnus-int.el @@ -504,6 +504,12 @@ If BUFFER, insert the article in that group." article (gnus-group-real-name group) (nth 1 gnus-command-method) buffer))) +(defun gnus-request-thread (id) + "Request the thread containing the article specified by Message-ID id." + (let ((gnus-command-method (gnus-find-method-for-group gnus-newsgroup-name))) + (funcall (gnus-get-function gnus-command-method 'request-thread) + id))) + (defun gnus-request-head (article group) "Request the head of ARTICLE in GROUP." (let* ((gnus-command-method (gnus-find-method-for-group group)) |