diff options
| author | Lars Magne Ingebrigtsen <[email protected]> | 2012-01-07 04:52:56 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <[email protected]> | 2012-01-07 04:52:56 +0000 |
| commit | a363cbed1d599072386ed51d8c7b038a471d0413 (patch) | |
| tree | 508d14ed6a855955792bdb59336d9887ac088b82 /lisp/gnus | |
| parent | c61ab18c894bac66e977f5e7722116ba127f5894 (diff) | |
Fix bug#9693 and bug#9697.
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 9 |
2 files changed, 11 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 3a7e412dca..13bae6f5ea 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,9 @@ 2012-01-07 Lars Magne Ingebrigtsen <[email protected]> + * gnus-sum.el (gnus-summary-read-group): Document more parameters + (bug#9693). + (gnus-summary-setup-buffer): Document return value (bug#9697). + * mm-decode.el (mm-interactively-view-part): Use `completing-read', since ido doesn't work on symbols (bug#9632). diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 916654c59a..878a96b926 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -3503,7 +3503,8 @@ display only a single character." (current-buffer)))))) (defun gnus-summary-setup-buffer (group) - "Initialize summary buffer." + "Initialize summary buffer. +If the setup was successful, non-nil is returned." (let ((buffer (gnus-summary-buffer-name group)) (dead-name (concat "*Dead Summary " (gnus-group-decoded-name group) "*"))) @@ -3931,7 +3932,11 @@ Input should look like this: \"Sun, 14 Oct 2001 13:34:39 +0200\"." "Start reading news in newsgroup GROUP. If SHOW-ALL is non-nil, already read articles are also listed. If NO-ARTICLE is non-nil, no article is selected initially. -If NO-DISPLAY, don't generate a summary buffer." +If NO-DISPLAY, don't generate the summary buffer contents. +If KILL-BUFFER, it should be a buffer that's killed once the new +summary buffer has been generated. +If BACKWARD, move point to the previous group in the group buffer +If SELECT-ARTICLES, only select those articles from GROUP." (let (result) (while (and group (null (setq result |