branch: elpa/fedi
commit 9338b6de92db50caad47e08d1e17fee1341b1afb
Author: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Commit: marty hiatt <martianhiatus [a t] riseup [d o t] net>
fedi-request: add arg docstring
---
fedi.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/fedi.el b/fedi.el
index 8fa95d56a24..ff98d458bea 100644
--- a/fedi.el
+++ b/fedi.el
@@ -51,7 +51,7 @@
Used to construct function names in `fedi-request'.")
(defmacro fedi-request
- (method name endpoint &optional args params auth-param json headers)
+ (method name endpoint &optional args docstring params auth-param json
headers)
"Create a http request function NAME, using http METHOD, for ENDPOINT.
ARGS are for the function.
PARAMS is an alist of form parameters to send with the request.
@@ -87,6 +87,7 @@ that handles auth by providing info using HEADERS or
AUTH-PARAM."
(indent 2))
(let ((req-fun (intern (concat "fedi-http--" method))))
`(defun ,(intern (concat fedi-package-prefix "-" name)) ,args
+ ,docstring
(let* ((url (fedi-http--api ,endpoint))
(url-request-method ,(upcase method))
(url-request-extra-headers ,headers)
