diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/nnimap.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 818440842cd..5a6ad584438 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -5,6 +5,11 @@ (auth-sources): Prefer the ~/.authinfo file over the ~/.authinfo.gpg file, especially when saving. +2011-06-21 Andrew Cohen <cohen@andy.bu.edu> + + * nnimap.el (nnimap-find-article-by-message-id): return nil when no + article found. + 2011-06-18 Teodor Zlatanov <tzz@lifelogs.com> * auth-source.el (auth-source-netrc-use-gpg-tokens): Replace diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index dc8b38b8f9a..1bbd76f345e 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -929,7 +929,7 @@ textual parts.") (car (setq result (nnimap-parse-response)))) ;; Select the last instance of the message in the group. (and (setq article - (car (last (assoc "SEARCH" (cdr result))))) + (car (last (cdr (assoc "SEARCH" (cdr result)))))) (string-to-number article)))))) (defun nnimap-delete-article (articles) |