Mercurial > emacs
changeset 110026:478f066057b8
gnus-summary-idna-message, nnrss-normalize-date, nnrss-discover-feed: Hyperlink urls in docstrings with URL `...' by Kevin Ryde <user42@zip.com.au>.
2009-07-16 Kevin Ryde <user42@zip.com.au> (tiny change)
* gnus-sum.el (gnus-summary-idna-message):
* nnrss.el (nnrss-normalize-date, nnrss-discover-feed):
Hyperlink urls in docstrings with URL `...'.
author | Katsumi Yamaoka <yamaoka@jpl.org> |
---|---|
date | Mon, 30 Aug 2010 06:21:33 +0000 |
parents | 5f352fd4346a |
children | 9604de1a8d28 |
files | lisp/gnus/ChangeLog lisp/gnus/gnus-sum.el lisp/gnus/nnrss.el |
diffstat | 3 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Mon Aug 30 06:17:45 2010 +0000 +++ b/lisp/gnus/ChangeLog Mon Aug 30 06:21:33 2010 +0000 @@ -1,3 +1,9 @@ +2009-07-16 Kevin Ryde <user42@zip.com.au> (tiny change) + + * gnus-sum.el (gnus-summary-idna-message): + * nnrss.el (nnrss-normalize-date, nnrss-discover-feed): + Hyperlink urls in docstrings with URL `...'. + 2010-08-29 Adam Sjøgren <asjo@koldfront.dk> * gnus-html.el (gnus-html-put-image): Use XEmacs-compatible image
--- a/lisp/gnus/gnus-sum.el Mon Aug 30 06:17:45 2010 +0000 +++ b/lisp/gnus/gnus-sum.el Mon Aug 30 06:21:33 2010 +0000 @@ -9524,7 +9524,7 @@ remain unencoded after running this function, it is likely an invalid IDNA string (`xn--bar' is invalid). -You must have GNU Libidn (`http://www.gnu.org/software/libidn/') +You must have GNU Libidn (URL `http://www.gnu.org/software/libidn/') installed for this command to work." (interactive "P") (if (not (and (condition-case nil (require 'idna)
--- a/lisp/gnus/nnrss.el Mon Aug 30 06:17:45 2010 +0000 +++ b/lisp/gnus/nnrss.el Mon Aug 30 06:21:33 2010 +0000 @@ -498,7 +498,7 @@ (defun nnrss-normalize-date (date) "Return a date string of DATE in the RFC822 style. This function handles the ISO 8601 date format described in -<URL:http://www.w3.org/TR/NOTE-datetime>, and also the RFC822 style +URL `http://www.w3.org/TR/NOTE-datetime', and also the RFC822 style which RSS 2.0 allows." (let (case-fold-search vector year month day time zone cts given) (cond ((null date)) ; do nothing for this case @@ -1012,7 +1012,7 @@ (defun nnrss-discover-feed (url) "Given a page, find an RSS feed using Mark Pilgrim's -`ultra-liberal rss locator' (http://diveintomark.org/2002/08/15.html)." +`ultra-liberal rss locator' (URL `http://diveintomark.org/2002/08/15.html')." (let ((parsed-page (nnrss-fetch url)))