1
0
Fork 0

Add autoloads

This commit is contained in:
Bram Schoenmakers 2024-08-03 21:58:08 +02:00
parent 82cce61a69
commit 6f6f0b906f
Signed by: bram
GPG key ID: 0CCD19DFDC63258F

View file

@ -124,19 +124,23 @@ return t when the entry should be exported."
(mapcar #'elfeed-export--entry-to-alist (mapcar #'elfeed-export--entry-to-alist
(elfeed-export-filter-entries entries)))) (elfeed-export-filter-entries entries))))
;;;###autoload
(defun elfeed-export-to-json () (defun elfeed-export-to-json ()
"Return the JSON string for all entries that should be exported." "Return the JSON string for all entries that should be exported."
(json-encode (elfeed-export--entries))) (json-encode (elfeed-export--entries)))
;;;###autoload
(defun elfeed-export-to-lisp () (defun elfeed-export-to-lisp ()
"Return the Lisp data string for all entries that should be exported." "Return the Lisp data string for all entries that should be exported."
(prin1-to-string (elfeed-export--entries))) (prin1-to-string (elfeed-export--entries)))
;;;###autoload
(defun elfeed-export-to-json-file (path) (defun elfeed-export-to-json-file (path)
"Write the JSON string to a file at PATH." "Write the JSON string to a file at PATH."
(interactive "F") (interactive "F")
(write-region (elfeed-export-to-json) nil path nil nil nil t)) (write-region (elfeed-export-to-json) nil path nil nil nil t))
;;;###autoload
(defun elfeed-export-to-lisp-file (path) (defun elfeed-export-to-lisp-file (path)
"Write the JSON string to a file at PATH." "Write the JSON string to a file at PATH."
(interactive "F") (interactive "F")