branch: externals/webfeeder
commit 3a30b31e2268341d885d02ea007d8ef7f86d61cb
Author: Pierre Neidhardt <[email protected]>
Commit: Pierre Neidhardt <[email protected]>
Escape author, title and subtitle for XML special characters.
---
webfeeder.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/webfeeder.el b/webfeeder.el
index 07f0ed0..1832455 100644
--- a/webfeeder.el
+++ b/webfeeder.el
@@ -406,12 +406,12 @@ variables:
(cl-loop for html-file in html-files
for dest = (expand-file-name html-file project-dir)
for feed-url = (concat (replace-regexp-in-string "/*$" "" url) "/"
html-file)
- for feed-author = (funcall webfeeder-author-function dest)
+ for feed-author = (xml-escape-string (funcall
webfeeder-author-function dest))
for feed-date = (or (funcall webfeeder-date-function
(expand-file-name html-file
project-dir))
0)
- for feed-title = (or (funcall webfeeder-title-function dest)
feed-url)
- for feed-subtitle = (funcall webfeeder-subtitle-function dest)
+ for feed-title = (or (xml-escape-string (funcall
webfeeder-title-function dest)) feed-url)
+ for feed-subtitle = (xml-escape-string (funcall
webfeeder-subtitle-function dest))
for feed-body = (funcall webfeeder-body-function dest feed-url
'exclude-toc)
for feed-categories = (funcall webfeeder-categories-function dest)
for feed-generator = (funcall webfeeder-generator-function dest)
