diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/ChangeLog | 10 | ||||
| -rw-r--r-- | lisp/gnus/gnus-html.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/nnimap.el | 5 |
3 files changed, 15 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index c5b91e84a63..faca19a8b3e 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -2,10 +2,20 @@ * nnmail.el (nnmail-fancy-expiry-targets): Fix typo in docstring. +2010-09-27 Lars Magne Ingebrigtsen <larsi@gnus.org> + + * nnimap.el (nnimap-request-accept-article): Message the error on + error. + 2010-09-27 Katsumi Yamaoka <yamaoka@jpl.org> * gnus-art.el (gnus-mime-delete-part): Fix Lisp type of byte(s). +2010-09-26 Florian Ragwitz <rafl@debian.org> + + * gnus-html.el (gnus-html-wash-tags): Decode URL entities to avoid + handing broken links to browse-url. + 2010-09-26 Lars Magne Ingebrigtsen <larsi@gnus.org> * nndoc.el (nndoc-request-list): Return success always. diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el index 587c28e974a..4bac528196d 100644 --- a/lisp/gnus/gnus-html.el +++ b/lisp/gnus/gnus-html.el @@ -286,7 +286,7 @@ Use ALT-TEXT for the image string." (setq url (match-string 1 parameters)) (gnus-message 8 "gnus-html-wash-tags: fetching link URL %s" url) (gnus-article-add-button start end - 'browse-url url + 'browse-url (mm-url-decode-entities-string url) url) (let ((overlay (gnus-make-overlay start end))) (gnus-overlay-put overlay 'evaporate t) diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index a99ee088330..c84bc6d5d78 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -772,7 +772,10 @@ some servers.") "\n" "\r\n")) (let ((result (nnimap-get-response sequence))) - (when result + (if (not (car result)) + (progn + (message "%s" (nnheader-get-report-string 'nnimap)) + nil) (cons group (nnimap-find-article-by-message-id group message-id)))))))) |