[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/webfeeder 4e980b2 17/22: RSS: Only include author if an
From: |
Pierre Neidhardt |
Subject: |
[elpa] externals/webfeeder 4e980b2 17/22: RSS: Only include author if an email address is found in the string |
Date: |
Tue, 26 Mar 2019 07:10:03 -0400 (EDT) |
branch: externals/webfeeder
commit 4e980b262db619a5ea5f776be6bddeede8c5d7db
Author: Pierre Neidhardt <address@hidden>
Commit: Pierre Neidhardt <address@hidden>
RSS: Only include author if an email address is found in the string
---
webfeeder.el | 13 ++++++++++++-
1 file changed, 12 insertions(+), 1 deletion(-)
diff --git a/webfeeder.el b/webfeeder.el
index 853be21..b05332d 100644
--- a/webfeeder.el
+++ b/webfeeder.el
@@ -297,7 +297,18 @@ The date is set to epoch if the item date is nil."
(concat
"<item>\n"
(when (webfeeder-item-author item)
- (concat " <author>" (webfeeder-item-author item) "</author>\n"))
+ ;; RSS <author> tag must start with the email. If no e-mail is found, we
+ ;; skip the tag altogether. Since it's hard to parse email addresses, we
+ ;; use `mail-extract-address-components' which expects the "NAME <EMAIL>"
+ ;; format.
+ (let ((name+addr (mail-extract-address-components (webfeeder-item-author
item))))
+ (when (cadr name+addr)
+ (concat " <author>"
+ (cadr name+addr)
+ (if (car name+addr)
+ (format " (%s)" (car name+addr))
+ "")
+ "</author>\n"))))
" <title>" (webfeeder-item-title item) "</title>\n"
" <description><![CDATA[" (webfeeder-item-body item) "]]></description>\n"
(when (webfeeder-item-categories item)
- [elpa] branch externals/webfeeder created (now b5148b4), Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder f6032b2 03/22: readme.org: Remove spurious (delete...) from base examples, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 06fab2c 04/22: webfeeder-test.el: Rename "page" to "rss" in test names, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 640b214 05/22: readme.org: Recommend libxml, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 1355a7b 08/22: webfeeder.el: Copy the readme into the commentary, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder bfeb09c 16/22: RSS: Remove subtitle from items since they are not supported by the standard, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder f34e3d6 07/22: readme.org: Fix rename feed-builder -> webfeeder, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 989c576 10/22: Atom: Remove <summary> from parent node, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 73b905e 14/22: Atom: Specify type for content, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 4e980b2 17/22: RSS: Only include author if an email address is found in the string,
Pierre Neidhardt <=
- [elpa] externals/webfeeder be073b5 06/22: webfeeder.el: Edit most docstrings, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 2b10906 18/22: Atom: Add support for email address in author field, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder b5148b4 22/22: Version 1.0.0, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 272bad4 02/22: webfeeder-test.el: Privatize -test-pages, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 9083513 21/22: Assign copyright to the Free Software Foundation, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 0f0ca1d 09/22: Atom: Fix missing closing tag in <link />, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 6e0a8d5 12/22: Fall back on default author set in webfeeder-default-author, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder a7cfbf1 11/22: Atom: Separate time with ":" in rfc3339, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder 567fbe3 13/22: Atom: Always href attribute for links, Pierre Neidhardt, 2019/03/26
- [elpa] externals/webfeeder e462414 19/22: testdata/post0.org: Add email address, Pierre Neidhardt, 2019/03/26