[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals-release/org 8ab1e30: contrib/lisp/ox-rss.el (org-rss-he
From: |
ELPA Syncer |
Subject: |
[elpa] externals-release/org 8ab1e30: contrib/lisp/ox-rss.el (org-rss-headline): Handle empty date |
Date: |
Fri, 30 Apr 2021 03:57:09 -0400 (EDT) |
branch: externals-release/org
commit 8ab1e30dbca544980475801afee29a7a5e31b41d
Author: Dr. Arne Babenhauserheide <arne_bab@web.de>
Commit: Bastien Guerry <bzg@gnu.org>
contrib/lisp/ox-rss.el (org-rss-headline): Handle empty date
* contrib/lisp/ox-rss.el (org-rss-headline): Handle empty date.
TINYCHANGE
Reported-by: "Dr. Arne Babenhauserheide" <arne_bab@web.de>
Link: https://orgmode.org/list/875z49echi.fsf@web.de/
---
contrib/lisp/ox-rss.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/contrib/lisp/ox-rss.el b/contrib/lisp/ox-rss.el
index bb069da..8e8e81a 100644
--- a/contrib/lisp/ox-rss.el
+++ b/contrib/lisp/ox-rss.el
@@ -245,7 +245,7 @@ communication channel."
(or (org-element-property :CATEGORY headline) "") info))
(pubdate0 (org-element-property :PUBDATE headline))
(pubdate (let ((system-time-locale "C"))
- (if pubdate0
+ (if (and pubdate0 (not (string-empty-p pubdate0)))
(format-time-string
"%a, %d %b %Y %H:%M:%S %z"
(org-time-string-to-time pubdate0)))))
@@ -270,7 +270,7 @@ communication channel."
(org-element-property :CUSTOM_ID headline)
publink)
info))))
- (if (not pubdate0) "" ;; Skip entries with no PUBDATE prop
+ (if (not pubdate) "" ;; Skip entries with no PUBDATE prop
(format
(concat
"<item>\n"
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals-release/org 8ab1e30: contrib/lisp/ox-rss.el (org-rss-headline): Handle empty date,
ELPA Syncer <=