Function: nnrss-opml-export
nnrss-opml-export is an interactive and byte-compiled function defined
in nnrss.el.gz.
Signature
(nnrss-opml-export)
Documentation
OPML subscription export.
Export subscriptions to a buffer in OPML Format.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/nnrss.el.gz
(defun nnrss-opml-export ()
"OPML subscription export.
Export subscriptions to a buffer in OPML Format."
(interactive)
(with-current-buffer (gnus-get-buffer-create "*OPML Export*")
(set-buffer-file-coding-system 'utf-8)
(insert "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n"
"<!-- OPML generated by Emacs Gnus' nnrss.el -->\n"
"<opml version=\"1.1\">\n"
" <head>\n"
" <title>mySubscriptions</title>\n"
" <dateCreated>" (format-time-string "%a, %d %b %Y %T %z")
"</dateCreated>\n"
" <ownerEmail>" user-mail-address "</ownerEmail>\n"
" <ownerName>" (user-full-name) "</ownerName>\n"
" </head>\n"
" <body>\n")
(dolist (sub nnrss-group-alist)
(insert " <outline text=\"" (car sub)
"\" xmlUrl=\"" (cadr sub) "\"/>\n"))
(insert " </body>\n"
"</opml>\n"))
(pop-to-buffer "*OPML Export*")
(when (fboundp 'sgml-mode)
(sgml-mode)))