From 0b10e43782149b24e36e03b7d286929f619e1fab Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Mon, 30 Aug 2010 06:21:33 +0000 Subject: [PATCH] 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 `...'. --- lisp/gnus/ChangeLog | 6 ++++++ lisp/gnus/gnus-sum.el | 2 +- lisp/gnus/nnrss.el | 4 ++-- 3 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index e23b94f2ac7..38b7da1dd24 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -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 --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 3199ade0c06..33c09556189 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -9524,7 +9524,7 @@ IDNA encoded domain names looks like `xn--bar'. If a string 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 --git a/lisp/gnus/nnrss.el b/lisp/gnus/nnrss.el index db1df33757c..b0f77b09da8 100644 --- a/lisp/gnus/nnrss.el +++ b/lisp/gnus/nnrss.el @@ -498,7 +498,7 @@ nnrss: %s: Not valid XML %s and w3-parse doesn't work %s" (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 @@ whether they are `offsite' or `onsite'." (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))) -- 2.39.2