# HG changeset patch # User Katsumi Yamaoka # Date 1283149293 0 # Node ID 478f066057b80f3f9c3a82edafa1cc5fd8e4077b # Parent 5f352fd4346a6c6f585796e5fa5024382d37f872 gnus-summary-idna-message, nnrss-normalize-date, nnrss-discover-feed: Hyperlink urls in docstrings with URL `...' by Kevin Ryde . 2009-07-16 Kevin Ryde (tiny change) * gnus-sum.el (gnus-summary-idna-message): * nnrss.el (nnrss-normalize-date, nnrss-discover-feed): Hyperlink urls in docstrings with URL `...'. diff -r 5f352fd4346a -r 478f066057b8 lisp/gnus/ChangeLog --- 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 (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 * gnus-html.el (gnus-html-put-image): Use XEmacs-compatible image diff -r 5f352fd4346a -r 478f066057b8 lisp/gnus/gnus-sum.el --- 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) diff -r 5f352fd4346a -r 478f066057b8 lisp/gnus/nnrss.el --- 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 -, 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)))