emacs-elpa-diffs
[Top][All Lists]
Advanced

[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"



reply via email to

[Prev in Thread] Current Thread [Next in Thread]