diff --git a/md4tj.el b/md4tj.el index 0096232..107ea45 100644 --- a/md4tj.el +++ b/md4tj.el @@ -404,8 +404,7 @@ (mapconcat #'md4tj-rss-channel-statement-toks-to-rss (md4tj-rss-get-channel-statements) "") (md4tj-rss-begin-tag "docs") "https://www.rssboard.org/rss-specification" (md4tj-rss-end-tag "docs") (md4tj-rss-begin-tag "generator") "md4tj-rss.el" (md4tj-rss-end-tag "generator") - (md4tj-rss-begin-tag "lastBuildDate") (format-time-string "%a, %d %b %Y %H:%M:%S GMT") (md4tj-rss-end-tag "lastBuildDate") - (md4tj-rss-end-tag "channel"))) + (md4tj-rss-begin-tag "lastBuildDate") (format-time-string "%a, %d %b %Y %H:%M:%S GMT") (md4tj-rss-end-tag "lastBuildDate"))) ;; Elt is triple of ;; Title @@ -415,8 +414,6 @@ "Return RSS for ELT." (concat (md4tj-rss-begin-tag "item") (md4tj-rss-begin-tag "title") (nth 0 elt) (md4tj-rss-end-tag "title") - ;; NOTE: change "j4nk" to author name - (md4tj-rss-begin-tag "author") "j4nk" (md4tj-rss-end-tag "author") (md4tj-rss-begin-tag "link") (nth 2 elt) (md4tj-rss-end-tag "link") (md4tj-rss-begin-tag "guid") (nth 2 elt) (md4tj-rss-end-tag "guid") (md4tj-rss-begin-tag "pubDate") (format-time-string "%a, %d %b %Y %H:%M:%S %Z" (string-to-number (nth 1 elt))) (md4tj-rss-end-tag "pubDate") @@ -436,6 +433,7 @@ (md4tj-rss-begin) (md4tj-rss-channel rsslink) (md4tj-rss-items) + (md4tj-rss-end-tag "channel") (md4tj-rss-end-tag "rss"))))) (defun md4tj-rss-to-file (infile outfile)