]> gitweb.fperrin.net Git - atom.el.git/commitdiff
Remove type=HTML/XHTML from RSS item descriptions
authorFrédéric Perrin <fred@fperrin.net>
Tue, 2 Apr 2024 18:32:45 +0000 (19:32 +0100)
committerFrédéric Perrin <fred@fperrin.net>
Tue, 2 Apr 2024 18:32:45 +0000 (19:32 +0100)
atom.el

diff --git a/atom.el b/atom.el
index b0d05121e7b223b549ad50bdfcc989ac2d9484fd..a7605ba9c6ff99dbc5918d5f0bbbf58ba65de0a8 100644 (file)
--- a/atom.el
+++ b/atom.el
@@ -203,7 +203,8 @@ Some information may be lost or approximated."
          (setcar (cdr guid) (list (cons 'isPermaLink "false"))))
       (if (and descr
               (equal (xml-get-attribute descr 'type) "xhtml"))
-         (setcar (cddr descr) (xml-node-as-text descr))))
+         (setcar (cddr descr) (xml-node-as-text descr)))
+      (setcar (cdr descr) nil))
     `(item nil ,@item)))
 
 (defun atom-to-rss-translator (source target translations)